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.
Zorunlu alan ve kaydet uyarıları
Metin kutularının "im" ve "Denetim İpucu Metni" özellikleri kullanılarak yapılan örnek uygulama ektedir.
Denetim sayısı fazla ise kullanılabilir.
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;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
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.
Konuyu Okuyanlar: 2 Ziyaretçi