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