AccessTr.neT

Tam Versiyon: liste kutusunda kayıt arama
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6 7
örneğiniz mükemmel.
Benim sorunum aslında; kodları düşünürken şöyle olursa böyle olsun gibi düşünmem. Bu bir nebze doğru fakat genelde türkçe çalıştığı için mantığım kodları nasıl yazsam diye terelli oluyorum. Aslında ingilizce bilmeme rağmen o şekilde düşünemiyorum. Sizin yazdığın If komutu benim aklımda canlandı. Fakat şekillendiremiyordum. Ama yavaş yavaş kodlar nedir nasıl çalışıyor mantığıma oturmaya başlıyor. Bunun içinde sizlere nasıl teşekkür etsem bilmiyorum. Hepinizden ALLAH RAZI OLSUN diyorum..
örneğinizi incelediğimde aklıma takılan bir konu var.Siz her forma formun kod kısımlarına;
Kod:
Private Sub Form_Current()
    Select Case KeyCode
    Case vbKeyF3: DoCmd.OpenForm "Form2", acNormal
    End Select
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
    Case vbKeyF3: DoCmd.OpenForm "Form2", acNormal
    End Select
End Sub
Private Sub ARA_Click()
DoCmd.OpenForm "Form2", acNormal, "", "", , acNormal
End Sub
bu kodlar F tuşunu kullanmak için yapmışsnız ARA_Click de form2 iki açıyor zaten.
Peki böyle yapmanızdaki maksat nedir acaba ?
Form2 formunada aşağıdaki kodu yazmışsnız.Bunlar üsteki formların kodlarıyla ilişkisi nedir?
Kod:
Private Function isFormLoaded(strFormName As String)
    isFormLoaded = SysCmd(SYSCMD_GETOBJECTSTATE, A_FORM, strFormName)
End Function
Form_KeyDown kodları F3 tuşu için,
ARA_Click kodları buton için yazıldı.

Function isFormLoaded ise;

Liste0_DblClick'te bulunan If isFormLoaded(FRM_A) kodunu çalıştıran (Açık olan formun tekrar açılması için) fonksiyon,

Form_Current() kodları fazladan yazılmış, bu koda
Kod:
KeyPreview = True
yazılabirir ama form özelliklerinden tuş önizleme zaten açık olduğu için buna da gerek yok.

[Resim: accesstrnet02jan101222mf1.jpg]
kendi çalışmamda F tşu çalışmıyor.
Fakat ara komutunu kullandım form2 açılıyor.carinin üstüne tıkladığımda parametre değerini gir diyor.
Alıntı:Formların ilişkilendirilmesi için "musid" metin kutusu,

18. mesajda belirttiğim gibi, her üç tabloda da benzersiz değer olması için musid metin kutusu ekledim, üstten cari kod seçtiğinde bu alana musid numarası yazılıyor, bundan sonraki eklemelerde musid eklenecek ama eski kayıtlar için musidi yazman gerekiyor. tabloda musid boş olduğu için parametre değerini bu yüzden soruyor.

F tuşunun çalışmaması ise;

bir üstteki mesajımda da belirttim.

form özelliklerinden tuş önizlemeyi aç veya geçerli olduğunda olayına

Kod:
KeyPreview = True
yaz


[Resim: accesstrnet02jan101222mf1.jpg]
siz ben soruyu yazmadan cevaplamışsınız.Teşekkür ederim.
musid kısmını
musid.visible =false
yaptım.Yani yeni ekle dediğim zaman görünür katdet yaptığım zaman false yaptım.Form2 ' açtığımda seçtiğim kayıt rahatlıkla geliyor.Bu konua bir pürüz kalmadı.
bu konuda bie sorum daha olucak o da;
Parasal taplolarda aynı işlemi yaptığım zaman carinin tüm kayıtlarını veriyor.Fakat ben yeni kayıt dediğim zaman Form2 ' yi açıp cari seçtiğimde sadece carinin carikod,adı ve soyadı parasal taploda seçilmiş olsun istiyorum.
Bunu nasıl yapabilirim??
Sayfalar: 1 2 3 4 5 6 7