Force Upper Case in a Text box, Combo box, Mask edit box etc.,

by Trinh Nguyen (4 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 27^th July 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
'The method given below can be applied to a text box, combo box, Maskedit box, List box, etc.,

Rate Force Upper Case in a Text box, Combo box, Mask edit box etc.,




  'Force UpperCase in Text1
  KeyAscii = Asc(UCase(Chr((KeyAscii)))

End Sub
_________________________________

Private Sub combo1_KeyPress(KeyAscii As Integer)

  'Force UpperCase in a combo box
  KeyAscii = Asc(UCase(Chr(KeyAscii)))

End Sub
__________________________________

Download this snippet Add to My Saved Code

Force Upper Case in a Text box, Combo box, Mask edit box etc., Comments

No comments have been posted about Force Upper Case in a Text box, Combo box, Mask edit box etc.,. Why not be the first to post a comment about Force Upper Case in a Text box, Combo box, Mask edit box etc.,.

Force Upper Case in a Text box, Combo box, Mask edit box etc.,

Force Upper Case in a Text box, Combo box, Mask edit box etc., Comments

Post your comment

Difficulty