Converting Lowercase to uppercase on keypress EvB 3.0
i am trying to convert lowercase to uppercase, how can i do this currently i do it like this but it does not work
Code:
Private Sub find_KeyPress(ByVal KeyAscii As Integer)
If KeyAscii > 96 And KeyAscii < 123 Then
'Typed letter from "a-z", map it to "A-Z"
KeyAscii = KeyAscii - 32
End If
End Sub
but is there also a way to check each Character in a text box and make it uppercase when a button is pressed?
Re: Converting Lowercase to uppercase on keypress EvB 3.0
Hi,
change the byval to byref and you should be OK
Pete