Membuat Text Huruf Besar Dengan Visual Basic

Agar tidak ada kesalahan pada pengisian data atau kata-kata pada from .
Contohnya from login .
Maka ada baiknya kita membuat isi text tersebut menjadi huruf besar atau kecil semuanya .

Untuk membuat text default huruf BESAR, biasa saya menggunakan Key Ascii.. nah Kodingnya seperti ini :

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

Dengan koding diatas, tulisan yang anda tulis di Text 1 menjadi besar semua, walaupun anda tdak menekan tombol CAPS LOCK pada Keyboard anda.