Merubah Karakter Di Texbox Menjadi Karakter Kecil / Kapital

Terkadang dalam penulisan sebuah kata / klimat dalam sebuah form, ada beberapa aktivitas yang mengharuskan seorang user untuk menginput sebuah kata / kalimat yang semuanya terdiri dari aksara kapital, sehingga  jika tidak di isi dengan aksara kapital maka aktivitas tersebut akan menampilkan sebuah pesan konfirmasi, contohnya "isi Form Dengan aksara Kapital".

Namun hal ibarat itulah, terkadang yang menciptakan user merasa kesal dan jengkel, sehingga menganggap aktivitas tersebut sangatlah ribet dan user pun tidak mau lagi untuk menggunakannya, kita sebagai seorang programer harus dapat untuk menghindari hal ibarat itu.

Di tutorial ini kita akan mencar ilmu Cara Mengubah Sebuah Huruf Menjadi Huruf Kapital, namun tak hanya aksara kapital saja, kita juga akan mencar ilmu mengubah semua aksara menjadi aksara kecil, untuk tutorial kali ini, toolbox yang akan kita gunakan hanya sedikit yakni 2 text box saja dan tool box pelengkapnya 2 label, untuk scripnya pun tidaklah banyak, hanya satu baris script saja, sepakat berikut tutorialnya

1. Seperti biasa, jalankan VB degan project standar exe
2. Di form tambahkan 2 text box dan 2 label sebagai pelengkapnya,
3. Untuk propertienya, disini aku hanya mengubah caption, text dan font size, sehingga tampilanya ibarat ini :.

4. Jika sudah, klik 2 kali text 1, dan ganti eventya menjadi keypress dan ganti () menjadi (KeyAscii As Integer).

5. Jika sudah tambahkan script berikut di antara Private Sub dan End Sub
KeyAscii = Asc(LCase(Chr(KeyAscii)))
sehingga keseluruhan scriptnya menjadi ibarat ini

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub

Untuk Text2 keseluruhan scriptnya

Private Sub Text2_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(LCase(Chr(KeyAscii)))
End Sub

Penjelasan script
variabel / instruksi KeyAscii, di rubah menjadi aksara kapital / Upper Case (UCase) dan aksara Kecil / Lower Case (Lcase) dengan perintah Asc, dan mengembalikanya dalam bentuk Kode KeyAscii yang baru.

6. Silahkan jalankan program,

jikalau aktivitas sudah berjalan, coba ketikan sebuah kata . kalimat di text box 1, semua aksara yang di tulis di text box 1, tanpa harus menekan shift / caps lock, akan menjadi aksara kapital semua, 

begitu juga dengan text box 2, semua aksara yang di tulis akan menjelma aksara kecil.

Sekian tutorial kali ini agar bermanfaat