Secara default untuk berpindah antar kontrol di vb kita bisa menggunakan tombol Tab yang sebelumnya tiap kontrol sudah kita atur properti TabIndex-nya. Namun kita juga bisa melakukannya dengan menggunakan tombol enter dimana kita akan menggunakan fungsi SendKeys.
Untuk menggunakan cara ini kita bisa menempatkan kodenya pada Event KeyPress pada tiap kontrol yang kita inginkan, misalnya pada textbox. Berikut ini adalah contoh kodenya:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{tab}"
KeyAscii = 0
End If
End Sub
Pada kode ini kita pastikan terlebih dahulu bahwa pengguna menekan tombol enter dimana tombol enter nilai ASCII-nya adalah 13. Setelah itu kita menggunakan fungsi SendKeys dimana kita mengirimkan nilai dari tombol Tab. Lalu nilai ASCII-nya kita kembalikan lagi menjadi 0.
26 December 2008
Subscribe to:
Post Comments (Atom)
7 comments:
Menagapa tidak menggunakan perintah :
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
text2.setfocus
End If
End Sub
begitu kan lebih efesien
bisa juga, tapi kalo kita punya banyak kontrol tentu kita juga harus menuliskan text2 .... text(n).setfocus
Kalo saya sh lebih efisien pake yg datas.
Keduanya baik, tergantung kita lebih suka pake yg mana.
klo pindah pindah kontrol menggunakan anak anak panah gimana??????misalmya salah ketik di textbox nya .....dari pada menggunakan mouse thaks..sebelimnya....
Wuah,, ternyata gampang banget ya.. :p
kebanyakan pikiran jadi gak kepikir.. hehehe
btw thx ya bro.. :)
Tips nya OK
mau tanya mas...
gmana caranya memindahkan data yang ada di datagrid ke textbox yg berada pada lain form...?
kalau bsa balas ke
cucuruswana@yahoo.co.id
sendkeys peke tanda {} ngga berhasil
Post a Comment