Sabtu, 06 Juni 2009

Merubah Huruf Menjadi Kapital

. Sabtu, 06 Juni 2009

Private Sub Text1_Keypress(keyascii As Integer)
' UNTUK MENJADIKAN INPUTAN HURUP KAPITAL
Keyascii = Asc(UCase(Chr(keyascii)))
End Sub

1 komentar:

Luna Last Smile mengatakan...

ini gimanamen maksudnye ?

Posting Komentar