|
[ Name Check, First Character To Upper Case ]
|
Email
|
| Submitted on: |
9/8/2003 6:06:32 PM |
| By: |
JamesJD
|
| Level: |
Beginner |
| User Rating: |
By 3 Users |
| Compatibility: |
VB 3.0, VB 4.0 (16-bit), VB 4.0 (32-bit), VB 5.0, VB 6.0 |
| Views: |
22924 |
|
(About the author) |
|
|
|
If a name is enter into the TextBox and has a lower case character then this program will change the first character to a Upper Case character. Please Vote and Comment :)
|
 |
| |
|
 Download code
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come
out every day, so no prevention program can catch 100% of them. For your own safety, please:
- Re-scan downloaded files using your personal virus checker before using it.
- NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
- Scan the source code with Minnow's Project Scanner
If you don't have a virus scanner, you can get one at many places on the net
including:McAfee.com
|
Terms of Agreement:
By using this code, you agree to the following terms...
- You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
- You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
- You may link to this code from another website, but ONLY if it is not wrapped in a frame.
- You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
|
Other 21 submission(s) by this author
|
|
Report Bad Submission
|
Your Vote
|
| |
Other User Comments
|
 9/8/2003 8:07:42 PM: redbird77
Another shorter way is:
StrConv(OldString, vbProperCase)
But suprisingly (or not) that way is slightly slower than yours.
Good for the beginner, but you should make sure use Option Explicit in all your forms & modules.
(If this comment was disrespectful, please report it.)
|
9/9/2003 12:50:03 AM: Ruturaj
Very poor ... you have not tested it in all possible ways.
Just give a space at the begining and then write a word ... your program fails. Trim function is the simple solution for this.
But I will give to * for poor testing of the program.
(If this comment was disrespectful, please report it.)
|
9/29/2003 12:56:10 AM: Kalyana Kumar
Excellent piece of work.My vote is for you.Keep up the good work.Well
deserved 5 globe from me.Thanks for sharing.Dont get demotivated by people's comments JamesJD.Just see what they have to say and then improve on it.
(If this comment was disrespectful, please report it.)
|
8/11/2006 9:15:21 PM: Vincent S.
That could be useful for beginner, but it is possible to shorten it :)
Public Function UCaseFirst(ByVal sString As String) As String
UCaseFirst = UCase(Left(sString, 1)) & Mid(sString, 2)
End Function
Don't use variables when it's not needed ;)
(If this comment was disrespectful, please report it.)
|
12/3/2006 9:56:39 AM: Brian Ail
gah, I entered nothing, clicked Correct and gave me an error!
(If this comment was disrespectful, please report it.)
|
6/17/2008 8:39:37 PM: -kraiz-
or you can make this extremely simple
and add
Text2 = StrConv(Text1, vbProperCase)
easy one line of code
(If this comment was disrespectful, please report it.)
|
6/17/2008 8:43:08 PM: -kraiz-
nice share,
you can also use
Text2 = StrConv(Text1, vbProperCase)
one line, easy
(If this comment was disrespectful, please report it.)
|
Add Your Feedback
Your feedback will be posted below and an email sent to
the author. Please remember that the author was kind enough to
share this with you, so any criticisms must be stated politely, or they
will be deleted. (For feedback not related to this particular code, please
click here instead.)
To post feedback, first please login.
|
