Gönderdiğim örnekte verdiğim alanlardan biri boş olursa kayıt yapmadan boş olan textbox a odaklanmasını istiyorum. Bir türlü başaramadım. Yardımlarınız için teşekkürler.

Tablonuzdaki alanların "Gerekli" özelliğini "Evet" olarak değiştirin.

Bu seferde hata uyarısı veriyor.

Kayıt butonunuzun tıklanma olayına

If Len(Me.adı & "a") = 1 Then
MsgBox ("adı alanı boş bırakılamaz")
Me.adı.SetFocus
End If
If Len(Me.tckimlik & "a") = 1 Then
MsgBox ("kimlik alanı boş bırakılamaz")
Me.tckimlik.SetFocus
End If
Exit Sub

On Error GoTo Err_Komut8_Click


DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.GoToRecord , , acNewRec
Exit_Komut8_Click:
Exit Sub

Err_Komut8_Click:
MsgBox Err.Description
Resume Exit_Komut8_Click

yazın

Ekteki örneği incelermisiniz.

Lütfen olumlu yada olumsuz geri dönüş yapınız.

Yardımlarınız için teşekkür ederim.