Setfocus Komutunda Ekran Titremesi

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