22-10-18, 12:02 AM
جرب هذا
استخدم الحدث KeyPress
استخدم الحدث KeyPress
كود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
e.KeyChar = Strings.UCase(e.KeyChar)
End Sub