saygıdeğer arkadaşlar;
altformlarla ilgili kodları yazmakta biraz zorlanıyorum.daha doğrusu alt formu tanımlamada.ekteki örnekte alt formdaki tel no yazılmadan adres kutusuna geçmemesi için nasıl bir kod önerirsiniz.
saygılar.
alt form denetimi
Lütfen İnceleyiniz..
Eğer ekediğim örnekteki formun kodunu;
olarak değiştirirseniz, bu kez mesaj almak yerine Tel No alanı boş ise Adres metin kutusunun kilitlenmesini sağlarsınız.
Eğer ekediğim örnekteki formun kodunu;
Kod:
Private Sub Form_Current()
If IsNull([TEL_NO]) Then
Me.Metin8.Locked = True
Else
Me.Metin8.Locked = False
End If
End Sub
teşekkürler sayın şahin.sorun halloldu.
Sevindim..Kolay gelsin..
Sn fox35, eğer form açıldığında son kaydın seçili olmasını istiyorsanız altformun koduna;
yazınız..
Kod:
Private Sub Form_Current()
DoCmd.GoToRecord , , acLast
End Sub
alt formu
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
DoCmd.GoToRecord , , acLast
End Sub
şeklinde yazınca oldu sayın şahin.alt formdan ayrılınca alt formda son kayda gidiyor dolayısıyla metin kutusu boş kalmamış oluyor.
teşekkürler.
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
DoCmd.GoToRecord , , acLast
End Sub
şeklinde yazınca oldu sayın şahin.alt formdan ayrılınca alt formda son kayda gidiyor dolayısıyla metin kutusu boş kalmamış oluyor.
teşekkürler.
Konuyu Okuyanlar: 1 Ziyaretçi