• Home
 · 
• Miscellaneous
 · 
• lowercase,uppercase and proper case

lowercase,uppercase and proper case

lowercase,uppercase and proper case

Rate lowercase,uppercase and proper case

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub optLower_Click()
    Dim strText As String
    strText = txtText.Text
    lblAnswer.Caption = LCase(strText)
End Sub

Private Sub optProper_Click()
    Dim strText As String
    strText = txtText.Text
    lblAnswer.Caption = StrConv(strText, vbProperCase)
End Sub

Private Sub optUpper_Click()
    Dim strText As String
    strText = txtText.Text
    lblAnswer.Caption = UCase(strText)
End Sub

Private Sub txtText_Change()
    lblAnswer.Caption = ""
End Sub

Private Sub cmdDone_Click()
    Unload Me
End Sub