Thursday, 25 August 2016

MEMINDAHKAN KURSOR DENGAN EVENTS KEYPRESS


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.



Untuk menggunakan events KeyPress, klik ganda pada TextBox1 lalu ganti

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

pasang iklan

Recent Post