Skip to main content

AccessTr.neT


Formda Bir Alana Değer Girilmesini Şart Koşmak.

Oğuz Türkyılmaz
Oğuz Türkyılmaz
25
4183

Formda Bir Alana Değer Girilmesini Şart Koşmak.

#7
Formunuzun Vba sayfasına 

Sub MetinKutusuKontrol()


Dim Sonuc As Boolean

Dim ctrl As Control
For Each ctrl In Screen.ActiveForm
   If ctrl.Tag = "1" Then
     
       If ctrl.Value = "" Or IsNull(ctrl.Value) Then
       
       MsgBox (ctrl.StatusBarText & " BOŞŞ")
       
       ctrl.SetFocus
       Exit Sub
       
       Sonuc = True
       
       End If
       
   End If
Next ctrl

If Sonuc = False Then

   DoCmd.RunCommand acCmdSaveRecord
   MsgBox "Bilgiler başarıyla kaydedildi.", vbInformation, "İşlem Tamam"

End If

End Sub

kodu ekle,  Kaydet butonunun tıklandığında olayındaki kodu aşağıdaki ile değiştir.

Call MetinKutusuKontrol

Boş geçilemeyecek metin kutularının İm özelliğine 1 yaz ve bu metin kutularının durum çubuğu metni özelliğine boş olduğunda görünecek mesajı yaz.

Örneğin txtTeklifVerilenFirma isimli metin kutusunun Durum Çubuğu Metni özelliğine "Teklif Verilen Firma" yazacaksın.
Cevapla
#8
Örneğinizin düzenlenmiş hali ektedir, önce kodları uygulamaya çalışın, örneği en son inceleyin.
.rar ISSE TEKLİF teklif no_sld.rar (Dosya Boyutu: 275,56 KB | İndirme Sayısı: 1)
Cevapla
#9
(03/12/2018, 13:47)haliliyas yazdı: peki forma girir girmez kendisi otomatik olarak butona basılmış gibi orayı doldursa
hatta buton hiç olmasa da "S_No"da olduğu gibi kendisi otomatik doldursa

Benim Kod üret butonuna tanımladığım formatta ürettirebilirsek tadından yenmez.Img-grin ( Butonuda sileriz ) Ve bu numara takip numarası olacağı için aynı zamanda asla bir başka forma aynı numarayı vermemeli Halil bey. Sonraki sorum bu konuda olacaktı Şöyleki, Mükerrer numara tekrarı gerçekleşmiş, seri bir şekilde alakasız kayıtlar açıp hızlı hızlı kaydederken oluşmuş ama nasıl bilmiyorum tablolardan kontrol ederseniz aynı kayıt numarasının 2 ayrı formda kullanıldığını görebilirsiniz. ( kayıtID:39 ve 40 )
Access Çekirgesi 
[Resim: img-cray.gif]


Son Düzenleme: 03/12/2018, 14:31, Düzenleyen: Oğuz Türkyılmaz.
Cevapla
#10
(03/12/2018, 14:00)ozanakkaya yazdı: Örneğinizin düzenlenmiş hali ektedir, önce kodları uygulamaya çalışın, örneği en son inceleyin.

Teşekkürler Ozan Bey, Hemen uygulayacağım.
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#11
aşağıdaki örneği inceler misiniz
.rar ISSE teklif no_hy.rar (Dosya Boyutu: 253,93 KB | İndirme Sayısı: 3)
Cevapla
#12
(03/12/2018, 14:00)ozanakkaya yazdı: Örneğinizin düzenlenmiş hali ektedir, önce kodları uygulamaya çalışın, örneği en son inceleyin.

OZAN Bey Metin kutusuna bir değer girilip girilmediğini metin kutusundan çıkarken yordamından halletsek, baktırsak  yani kaydet butonuna kadar kontrolsüz bir şekilde gitmese anında çözse kullanıcı istenen değeri  o an girse ondan sonra diğer sekmelerdeki alanların girişine devam ettirsek kafamdaki diğer formlar içinde daha doğru bir çözüm olacak bu proje için.
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da