want to Display Upper Case Letters in Text Box while Pressing Lower Case Letters, How?
-
want to Display Upper Case Letters in Text Box while Pressing Lower Case Letters, I tried with Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii >= 65 And KeyAscii <= 122 Then Text1.Text = UCase(Text1.text) End If End Sub but it is printing in reverse , is there any other mothods.
-
want to Display Upper Case Letters in Text Box while Pressing Lower Case Letters, I tried with Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii >= 65 And KeyAscii <= 122 Then Text1.Text = UCase(Text1.text) End If End Sub but it is printing in reverse , is there any other mothods.
Hi in the properties section of the text1 control you have an option called CharacterCasing which is set to Normal by Default. Set this to upper so that when the user types in lower or upper it will display in UPPER Case. thanks