AccessTr.neT

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.

Örneğinizin düzenlenmiş hali ektedir, önce kodları uygulamaya çalışın, örneği en son inceleyin.

(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. ( 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 )

(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.

aşağıdaki örneği inceler misiniz

(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.