AccessTr.neT

AccessTr.neT > Microsoft Access > Access Cevaplanmış Soruları > SetFocus olayı
Tam Versiyon: SetFocus olayı
Ş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

fascioğlu

30/12/2015, 14:33
Sayın Hocalarım,

Yapmış olduğum çalışmada acl_ODEMETURU açılan kutudan işlem seçmeden diğer bir alana atlamaması ve ODEMETUR'unun seçilmesinin zorunlu kılmak için;
Kod:
Private Sub acl_ODEMETURU_Exit(Cancel As Integer)
MsgBox "Lütfen Ödeme Türünü Seçiniz"
Me.acl_ODEMETURU.SetFocus
End Sub

acl_ODEMETURU alanının çıkıldığında olayına yukarıdaki kodu ekledim.Ancak veri girlmeden tab veya Enter ile çıkıldığında Uyarı msj.almama rağmen ODEMETURU alanına geri focuslamıyor diğer bir alana geçiyor,sitedeki bir çok örneği inceledim
hepsinde de aynı sorun var en son Hayri beyin Celoyce hocanın örneklerini inceledim,soruma cevap bulamadım.
Saygılarımla.

C*e*l*o*y*c*e

30/12/2015, 15:55
Me.acl_ODEMETURU.show()
Me.acl_ODEMETURU.SetFocus

Bu sekilde dene ,

fascioğlu

30/12/2015, 16:08
Sayın Celoyce hocam
Me.acl_ODEMETURU.show() bu kod kırmızı renkte hata veriyor,bu kodun eksiğimi var yoksa benim yazdığım kod içerisindemi yer alacak.Belirtirseniz sevinirim
Saygılarımla

atoz112

30/12/2015, 16:29
sayın fascioglu,

bahsettiğiniz talebinize yönelik olarak;
aşağıdaki kod ifadelerini deneyebilirsiniz.

Kod:
Private Sub acl_ODEMETURU_Exit(Cancel As Integer)
If IsNull(Me.acl_ODEMETURU) Or Me.acl_ODEMETURU = "" Then
MsgBox "Lütfen Ödeme Türünü Seçiniz"
'acl_ODEMETURU öncesinde bir başka denetime odaklanıp sonra asıl denetime geçilmesi uygun olur
Me.id_denetim_adi.SetFocus
Me.acl_ODEMETURU.SetFocus
Exit Sub
Else
End If
End Sub

bilginize...iyi çalışmalar,saygılar.

C*e*l*o*y*c*e

30/12/2015, 16:30
Private Sub acl_ODEMETURU_Exit(Cancel As Integer)
If Me.acl_ODEMETURU="" THEN
Me. ----- (BURDA BAŞKA BİR ALANNI YAZ).SetFocus
MsgBox "Lütfen Ödeme Türünü Seçiniz"
Me.acl_ODEMETURU.SetFocus
End Sub

böyle deneyin birde


aslında örneğini eklesen daha çabuk sonuç alırsın,böyle farazi oluyor

fascioğlu

30/12/2015, 16:54
Sayın hocalarım,
Örnek ekte.
Saygılarımla
Sayfalar: 1 2
AccessTr.neT > Microsoft Access > Access Cevaplanmış Soruları > SetFocus olayı