Skip to main content

AccessTr.neT


Zorunlu alan ve kaydet uyarıları

Zorunlu alan ve kaydet uyarıları

#6
Kodu aşağıdaki gibi kullanabilirsiniz.


If IsNull(Me.Metin0) Or Me.Metin0 = "" Then
   MsgBox "Metin0 boş bıraktınız."
   Me.Metin0.SetFocus
   Exit Sub
ElseIf IsNull(Me.Metin2) Or Me.Metin2 = "" Then
   MsgBox "Metin2 boş bıraktınız."
   Me.Metin2.SetFocus
   Exit Sub
ElseIf IsNull(Me.Metin4) Or Me.Metin4 = "" Then
   MsgBox "Metin4 boş bıraktınız."
   Me.Metin4.SetFocus
   Exit Sub
Else
   MsgBox ("Tüm Alanlar Dolu")
End If
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Zorunlu alan ve kaydet uyarıları - Yazar: ertans - 30/12/2016, 09:43
Cvp: Zorunlu alan ve kaydet uyarıları - Yazar: ertans - 30/12/2016, 12:06
Cvp: Zorunlu alan ve kaydet uyarıları - Yazar: ertans - 30/12/2016, 13:12
Cvp: Zorunlu alan ve kaydet uyarıları - Yazar: ozanakkaya - 30/12/2016, 13:48
Cvp: Zorunlu alan ve kaydet uyarıları - Yazar: ertans - 30/12/2016, 13:56
Cvp: Zorunlu alan ve kaydet uyarıları - Yazar: ertans - 30/12/2016, 14:34
Task