AccessTr.neT

Tam Versiyon: Zorunlu alan ve kaydet uyarıları
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Sayın ozanakkaya size ve zaman ayıran tüm forum arkadaşlarıma teşekkür ederim. Sayenizde sorun çözüldü. Herkese mutlu ve sağlıklı seneler dilerim, saygılarımla.
Metin kutularının "im" ve "Denetim İpucu Metni" özellikleri kullanılarak yapılan örnek uygulama ektedir.

Denetim sayısı fazla ise kullanılabilir.

Dim MetinKutum As Control

For Each MetinKutum In Me

   If MetinKutum.Tag = "bosmu" Then
   
       If MetinKutum.Value = "" Or IsNull(MetinKutum.Value) Then
       
           MsgBox (MetinKutum.ControlTipText & " Alanı Boş Bırakılamaz")
           MetinKutum.SetFocus
           Exit Sub
       End If
   End If

Next MetinKutum
         
   MsgBox ("Tüm Alanlar Dolu") 'Tüm alanlar Doluysa yapılacak işlem
Sayın ozanakkaya, onay kutuları için kullanamadım bunun için de bir kontrol var mı?
Onay kutusu için herhangi bir kontrol yok. eklediğiniz onay kutusunun "im" özelliğine bosmu, Denetim ipucu metnine de istediğiniz metni yazarak kullanabilirsiniz.
sayın ertans,

EK'te;

Alıntı:...onay kutuları için kullanamadım bunun için de bir kontrol var mı? ...

bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Sayfalar: 1 2