AccessTr.neT

Tam Versiyon: Setfocus Komutunda Ekran Titremesi
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Arkadaşlar komut1 metin kutusuna girildikten sonra komut1 metin kutusu exıt bölümüne komut1 i kontrol ettiriyorum değer büyükse
Komut1 i boşaltıp
 komut0. Setfocus
 ile komut0 metin kutusuna imleci odaklandıtıyorum
Komut1 e girilen değer küçük ise imlecin 
Aynı yerde kalmasını yanı basılan tap anlık tuşunun iptal olmasını sonraki segme değerine geçmemesini ve setfocus kullandığın zaman ekranın (formun) titrememesini, (yeniler ggibi sallanmamasını) nasıl sağlarım
(16/12/2018, 00:40)bibib yazdı: [ -> ]Arkadaşlar komut1 metin kutusuna girildikten sonra komut1 metin kutusu exıt bölümüne komut1 i kontrol ettiriyorum değer büyükse
Komut1 i boşaltıp
 komut0. Setfocus
 ile komut0 metin kutusuna imleci odaklandıtıyorum
Komut1 e girilen değer küçük ise imlecin 
Aynı yerde kalmasını yanı basılan tap anlık tuşunun iptal olmasını sonraki segme değerine geçmemesini ve setfocus kullandığın zaman ekranın (formun) titrememesini, (yeniler ggibi sallanmamasını) nasıl sağlarım

Örneğinizi ekleyin bence...
büyüklükten ne kastettiğinizi bilemediğim için komut1'e giren sayı 1000000 'dan büyükse yada küçükse şeklide yazdım dilerim işinize yarar
Private Sub komut1_Exit(Cancel As Integer)
If Int(Nz(Me.komut1)) > 1000000 Then
Me.komut1.Text = ""
Me.komut0.SetFocus
Else
Me.komut0.SetFocus
Me.komut1.SetFocus
komut1.SelStart = Len(komut1.Text) + 1
End If
End Sub
Konu çözüldü taşıyabilirsiniz