Herkese Kolay Gelsin Arkadaşlar

Access Veritabanında Personel Girişi Yapmak İçin Bir Form Açtım
Bu Formda Personel Bilgilerini Giriyorum
Tc_Kimlik Numarası Yazan Metin Kutusuna (Giriş Maskesi) oluşturdum 11 haneli
11 hane altında ve 11 hane üstünde giriş yapmayı önlemek için

Fakat personel girişi yaparken bazen tc_kimlik no hanesini unutup boş geçebiliyorlar giriş yapan personel
boş geçmemesi için ne yapmalıyım
tc_kimlik no metin kutusu boş geçmemesi gerekiyor.

Teşekkürler.

tc_kimlik no metin kutusunun cıkıldıgında olay yordamına alttaki kodu deneyiniz

Private Sub tc_kimlik_no_Exit(Cancel As Integer)
If IsNull(Me![tc_kimlik_no]) Then
If MsgBox("tc_kimlik_no Adı alanı boş... Boş geçilsinmi..? ", vbYesNo) = vbNo Then
Me.tc_kimlik_no.SetFocus
End If
End Sub

Sayın.özgülapt Hocam

Me.tc_kimlik_no.SetFocus Hata verdi

Teşekkürler

Bahsettiğiniz alan olmadığı için hata veriyor.


değil


olacak.

Ayrıca diğer tc_kimlik_no yazan yerleride değiştirmeniz gerekiyor.

sayın.onur_can hocam

Metin Kutusu Olay yardımı çıkıldığı olayına dediğiniz gibi düzelttim

Private Sub tc_kimlik_no_Exit(Cancel As Integer)

If IsNull(Me![tc_kimlik]) Then
If MsgBox("tc_kimlik_no Adı alanı boş... Boş geçilsinmi..? ", vbYesNo) = vbNo Then
Me.tc_kimlik.SetFocus
End If

End Sub


Compile error: Expected End Sub



Hatası verdi hocam

Teşekkürler

End Sub 2 defa kullanılmış olabilir ya da Kodun en sonunda End Sub ifadesini yanlışlıkla silmiş olabilirsiniz. kontrol edin 2 tane ise birini silin, yoksa ekleyin.
Private Sub ile başlayan tc_kimlik_no satırınıda düzelttiniz mi?