by Sreeram.P (16 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Tue 9th May 2006
Date Added: Mon 8th February 2021
Rating: (1 Votes)
'Simple code for convert text to UPPERCASE
Dim pos As Long
If Len(txtCtrl(Index)) >= 1 Then
pos = txtCtrl(Index).SelStart
txtCtrl(Index) = UCase(txtCtrl(Index))
txtCtrl(Index).SelStart = pos
End If
end sub