<div>
For i = 1 To Len(theString)<br />
&nbsp; If Asc(Mid(theString, i, 1)) &gt;= 65 And Asc(Mid(theString, i, 1)) &lt;= 90 Then<br />
&nbsp; &nbsp; MsgBox &quot;You entered some uppercase letters.&quot;<br />
&nbsp; End If<br />
Next i<br />
<br />
theString = LCase(theString)
</div>


<div>
Rather,<br />
<br />
For i = 1 To Len(theString)<br />
&nbsp; If Asc(Mid(theString, i, 1)) &gt;= 65 And Asc(Mid(theString, i, 1)) &lt;= 90 Then<br />
&nbsp; &nbsp; MsgBox &quot;You entered some uppercase letters.&quot;<br />
&nbsp; &nbsp; Exit For<br />
&nbsp; End If<br />
Next i<br />
<br />
theString = LCase(theString)
</div>


<div>
Although, if you're going to let the user enter upper case characters anyway, what's the point of warning them? &nbsp;Maybe better to just always convert to lower case?<br />
<br />
You could handle the KeyPress event of textboxes etc so even if the user typed an upper case letter they'd see it entered as lower case.
</div>


<div>
&gt; You could handle the KeyPress event of textboxes etc so even if the user typed an upper case letter<br />
&gt;&nbsp;they'd see it entered as lower case.<br />
<br />
Good point, thanks, that would be more elegant. Can you give me a tip how to do this? (nb: I've tried the input mask &lt;&nbsp;but I don't like the way the mask is presented to the user).
</div>


<div>
Thanks, tgerbert, that works a treat! A very quick and helpful answer, and I can see plenty of other uses for that technique as the project progresses.
</div>


<div>
<div class="content wysiwyg-content">
I need to test a string in Access vba to see if it contains any uppercase characters, warn the user, and then convert those characters into lowercase before saving. However, the string might contain numerical characters as well. Tests I've tried using LCase and strComp appear to treat numbers as uppercase and warn the user, although I'm happy to have the numbers accepted as they are. Any help appreciated (and also any tips on how I can test a string to see if its first character is a number and disallow it).
</div>
</div>


I need to test a string in Access vba to see if it contains any uppercase characters, warn the user, and then convert those characters into lowercase before saving. However, the string might contain numerical characters as well. Tests I've tried using LCase and strComp appear to treat numbers as uppercase and warn the user, although I'm happy to have the numbers accepted as they are. Any help appreciated (and also any tips on how I can test a string to see if its first character is a number and disallow it).

Detect and convert uppercase (but not number) in a string

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.