Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Button Kontrolü

untouchable
untouchable
Access Cevaplanmış Soruları
2
811

Button Kontrolü

#3
untouchable
UntouchabLe
untouchable
Bul
Aktif Üye*
Adı Soyadı: Ha....
Yaşı: 33
Konum: Van
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 23/03/2022,17:36
Yorumları: 132
Konuları: 33
Kayıt Tarihi: 04/10/2018
Teşekkür Puanı: 0
Mesleğiniz: Bilgisayar
(12/09/2019, 15:13)berduş yazdı: if kodunun mantığını yanlış kurmuşsunuz gibi geldi
Kod:
If Me.Form.Dirty = True Then
If (IsNull(txtCRM.Value)) Or (IsNull(txtMalzemeSec.Value)) Or (IsNull(txtMiktar.Value)) Or (IsNull(txtAciklama.Value)) Or (IsNull(txtBelgea.Value)) Then
   MsgBox "Boş alan..!Lütfen eksik alanları doldurunuz.. ", vbOKOnly + vbCritical, "Kayıtta Eksik Bilgi": Me.txtCRM.SetFocus
Exit Sub
End If 'isnull end if
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.Close
end if 'dirty  end if


Teşekkürler hocam
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
Button Kontrolü - Yazar: untouchable - 12/09/2019, 14:27
RE: Button Kontrolü - Yazar: berduş - 12/09/2019, 15:13
RE: Button Kontrolü - Yazar: untouchable - 12/09/2019, 15:44
Task