• Home
 · 
• String Manipulation
 · 
• A code snippet which converts the first characters of the first name, middle name and last name int

A code snippet which converts the first characters of the first name, middle name and last name int

A code snippet which converts the first characters of the first name, middle name and last name into upper case automatically. Hope everyone

Rate A code snippet which converts the first characters of the first name, middle name and last name int

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Text1.Text = "" Then
    KeyAscii = Asc(UCase(Chr(KeyAscii)))
ElseIf Text1.Text <> "" Then
    If tmp = 32 Then
        KeyAscii = Asc(UCase(Chr(KeyAscii)))
    Else
        KeyAscii = KeyAscii
    End If
 tmp = KeyAscii
End If
End Sub