…. Then
MsgBox "Boş alan..!Lütfen eksik alanları doldurunuz.. ", vbOKOnly + vbCritical, "Kayıtta Eksik Bilgi"
Me.txtCRM.SetFocus
exit sub
end if
resmi silmek için "kill" komutunu kullanabilirsinizkill dosyaAdresi&dosyaAdi
…. Then
MsgBox "Boş alan..!Lütfen eksik alanları doldurunuz.. ", vbOKOnly + vbCritical, "Kayıtta Eksik Bilgi"
Me.txtCRM.SetFocus
exit sub
end if
resmi silmek için "kill" komutunu kullanabilirsinizkill dosyaAdresi&dosyaAdi
Bu Konudaki Yorumlar |
Resim Ekleme - Yazar: untouchable - 13/09/2019, 17:31
Cvp: Resim Ekleme - Yazar: berduş - 13/09/2019, 18:13
|