Merubah Huruf Di Texbox Menjadi Huruf Kecil / Kapital

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

Namun hal seperti itulah, terkadang yang membuat user merasa kesal dan jengkel, sehingga menganggap program tersebut sangatlah ribet dan user pun tidak mau lagi untuk menggunakannya, kita sebagai seorang programer harus bisa untuk menghindari hal seperti itu.

Di tutorial ini kita akan belajar Cara Mengubah Sebuah Huruf Menjadi Huruf Kapital, namun tak hanya huruf kapital saja, kita juga akan belajar mengubah semua huruf menjadi huruf kecil, untuk tutorial kali ini, toolbox yang akan kita gunakan hanya sedikit yaitu 2 text box saja dan tool box pelengkapnya 2 label, untuk scripnya pun tidaklah banyak, hanya satu baris script saja, baiklah 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 saya hanya mengubah caption, text dan font size, sehingga tampilanya seperti 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 seperti 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 / kode KeyAscii, di rubah menjadi huruf kapital / Upper Case (UCase) dan huruf Kecil / Lower Case (Lcase) dengan perintah Asc, dan mengembalikanya dalam bentuk Kode KeyAscii yang baru.

6. Silahkan jalankan program,

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

begitu juga dengan text box 2, semua huruf yang di tulis akan berubah menjadi huruf kecil.

Sekian tutorial kali ini semoga bermanfaat