MEMINDAHKAN KURSOR DENGAN EVENTS KEYPRESS
Selamat pagi sobat, apakah sobat sudah sarapan ? kalau belum, segera sobat sarapan karena kita akan belajar pemrograman yang cukup menguras kerja otak kita hehe...
oke kita lansung saja, pada postingan kali ini kita akan mempelajari bagaimana memindahkan kursor dengan even keypress,
Coba sobat desainlah form seperti pada gambar berikut. Gunakan 2 buah TextBox.
pilihan events yang terletak seperti pada gambar berikut.
Tambahkan pernyataan berikut pada events KeyPress yang sudah dibuat
sebelumnya.
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
As System.Windows.Forms.KeyPressEventArgs) Handles
TextBox1.KeyPress
If Asc(e.KeyChar) = 13 Then
TextBox2.Focus() 'memindahkan kursor ke TextBox2
TextBox1.CharacterCasing = CharacterCasing.Upper 'membuat huruf
dalam TextBox1 menjadi kapital
End If
End Sub
Jalankan program dan cobalah untuk mengetik pada TextBox1 lalu tekan enter,
kursor akan berpindah ke TextBox2 dan tulisan pada TextBox1 akan berubah menjadi huruf kapital.
Semoga dapat bermanfaat untuk kita semua untuk postingan singkat ini!!!
Dan berikutnya kita akan mempelajari " VARIABEL DAN TIPE DATA "
No comments:
Post a Comment