(08/10/2018, 03:47)ozanakkaya yazdı: [ -> ]Zaten hatanın sebebi yazıyor. Etiket1 isimli etiket var ise 2. Etiket1'i oluşturamazsınız. Önce Etiket1'in ismini Etiket1222 olarak değiştirin.
Evet onu biliyorum anlamadığım siz etiket1 etiket2 diye nasıl tanımlayabildiniz. Size dosyayı gönderdiğimde bu etiket isimleri kullanıyordu yine, onu anlayabilmek için yazdım.
Siz yeni etiket ve metin kutuları eklemişsiniz. Etiket1 etiket2 formda alt alta duruyor. Onlara dokunulmamış, yenileri eklenmiş.
Ozan Bey
Yapmamı söylediğini düzenlemeleri şu şekilde yaptım
1- Formun kayıt kaynağı
SQL Code
Kod:
SELECT * FROM TBL_KIRASOZLESMESI LEFT JOIN TBL_SENETDUZENLE ON TBL_KIRASOZLESMESI.Kimlik = TBL_SENETDUZENLE.SOZLESMENO;
Şeklinde değiştirildi.
2.
GTaksit = Me.SENETTUTAR / Me.SENETADEDI
Kodundaki Me.SENETTUTAR kısmı Me.BirYillikKiraKarsiligiRakamİle ile değiştirildi.
Me.SENETADEDI şeklindeki kod Me.TAKSIDADEDI olarak değiştirildi.
SENETVADEBASLANGICI ...... VADEBASLANGIC olarak değiştirildi.
12 Adet Etiket Ve Metin Kutusu isimleri söylediğiniz şekilde düzenledim. Buşekilde ( Etiket1, etiket2 farklı yerde kaldığı için form açıldığında yanlış denetimler gizleniyor. Hesaplama yapılmıyor.) İfadenizde yapmam gereken başka bir değişiklik varmı tam anlayamadım.
(Önceki uygulamada formdaki Senet oluştur butonunun tıklandığında olayına kod yazılmış) Şeklindeki ifadenizde geçen makro yeni form aç makrosuydu ( senetdüzenle formu ) dediğiniz gibi sildim. Ama bu sebeblemi bilmiyorum 2.Formun tablosuna bağlı bölümler Tasarım bölümünde gözükürken Form Görüntüsüne geçtiğimde kayboluyor. KirasozlesmeID.kimlik ile 2.formun tablosundan çekilen sozlesmeno arasındaki bağlantıyı bir şekilde bozdum sanırım. Hesap Yap fonksiyonunun çalıştırılmasına bu yüzden henüz gelemedim.
![[Resim: do.php?imgf=153902380509781.jpg]](https://accesstr.net/resim/do.php?imgf=153902380509781.jpg)
Alıntı:12 Adet Etiket Ve Metin Kutusu isimleri söylediğiniz şekilde düzenledim.
Böyle Bir düzenleme göremedim. örneğinizin düzenlenmiş hali ektedir.
(09/10/2018, 19:34)ozanakkaya yazdı: [ -> ]Alıntı:12 Adet Etiket Ve Metin Kutusu isimleri söylediğiniz şekilde düzenledim.
Böyle Bir düzenleme göremedim. örneğinizin düzenlenmiş hali ektedir.
Ozan Bey teşekkür ederim. Bir sorum olacak vade aralığı sabit 30 gün olarak düzenleniyor bu örnekte, fakat diyelimki kullanıcı 45'er günlük vade aralığında senetler oluşturmak istiyor bu durumda oluşturamıyor ( vade aralığı sabit değil değişken olmalı ) Bu değişken özelliğini nasıl ve nereye tanımlayabilirim. ( Bu proje için sormuyorum genel olarak bir senet programı yazılsa bu projedeki kodu nasıl değiştirmem gerekir diye öğrenmek istedim.)
Controls("Etiket" & X).Caption = DateAdd("m", X, VADEBASLANGIC)
kodu ile, vadebaslangic alanındaki veriye göre ay ekleniyor. kodda x = 1 iken Etiket1'e 1 ay, x = 2 iken Etiket2'ye 2 ay eklemiş oluyor.
Sizin örneğinizde 30 gün veya 45 gün olayı Vade Aralığı metin kutusuna yazılacak değerde alınacak ise kodun
Controls("Etiket" & X).Caption = DateAdd("d", (X * Me.VADEARALIGI), VADEBASLANGIC)
şeklinde değiştirilmesi gerekli.