Skip to main content

AccessTr.neT


Zorunlu alan ve kaydet uyarıları

Zorunlu alan ve kaydet uyarıları

#1
Merhaba arkadaşlar, formda zorunlu alanların doldurulması ve kaydedilmeden çıkılmaması uyarılarını nasıl verebilirim. İyi çalışmalar dilerim.
Cevapla
#2
if isnull (me.metinkutusuadi) or me.metinkutusuadi="" then: msgbox "metinkutusuadi boş bıraktınız.": me.metinkutusuadi.setfocus:exit sub

geri bildirimde bulununuz.
POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.
Cevapla
#3
(30/12/2016, 11:10)ozguryasin yazdı:
if isnull (me.metinkutusuadi) or me.metinkutusuadi="" then: msgbox "metinkutusuadi boş bıraktınız.": me.metinkutusuadi.setfocus:exit sub

geri bildirimde bulununuz.

Sayın ozguryasin, bu kodu nerede kullanmalıyım. Yardımınız ricası ile..
Cevapla
#4
Formun Güncelleme öncesine yazmanız gerekli
Cevapla
#5
Sayın ozguryasin, Sayın boolean, örnek kodu tarif ettiğiniz şekilde kullandım ve çalışıyor. Bir metin kutusu için çalışıyor, 3 ayrı metin kutusunu nasıl kontrol etmesini sağlarım. İyi çalışmalar dilerim.
Cevapla
#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
Task