TextBox’a Sadece Küçük Yada Büyük Harf Girmek

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(LCase(Chr(KeyAscii))) ‘ Büyük harf için “UCase”
End Sub