'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This

by Danilo S. Abeleda (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 10^th February 2007
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This Is Useful When You Want To Type A Biodata

API Declarations
'Preparation One TextBox Dim cc as Integer

Rate 'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This



Dim a, b, c, d
a = Text1.Text
b = Text1.SelStart
If b = 1 Then
Text1.Text = UCase(a)
Text1.SelStart = b + 1
End If

If KeyAscii = vbKeySpace Then
cc = 3 + b
End If
b = b + 1

If cc = b Then
c = Right(a, b - b + 1)
d = Left(a, b - 2)
Text1.Text = d & UCase(c)
Text1.SelStart = b + 1
End If
End Sub

Download this snippet Add to My Saved Code

'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This Comments

No comments have been posted about 'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This . Why not be the first to post a comment about 'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This .

'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This

'You Can Type A Text Without Using The Shift Button To Capital The Beggining Of Every Letter. This Comments

Post your comment

Difficulty