• Home
 · 
• String Manipulation
 · 
• Convert Lower case to Upper case

Convert Lower case to Upper case

Convert Lower case to Upper case

API Declarations


It's only 4 lines code
and easy to Understand



Rate Convert Lower case to Upper case

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Call ConvUpcase(KeyAscii)
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
Call ConvUpcase(KeyAscii)
End Sub

Private Sub ConvUpcase(keyvalue As Integer)
If keyvalue >= 97 And keyvalue <= 122 Then
 keyvalue = keyvalue - 32
End If
End Sub