<div>
Enter text into &nbsp;Text6 - display count in Text8<br />
<br />
Private Sub Text6_Change()<br />
&nbsp; &nbsp; Me.Text8 = &quot;Remaining: &quot;&nbsp;&amp; 250 - Len(Me.Text6.Text)<br />
&nbsp; &nbsp; DoEvents<br />
End Sub<br />
<br />
mx
</div>


Enter text into  Text6 - display count in Text8

Private Sub Text6_Change()
    Me.Text8 = "Remaining: " & 250 - Len(Me.Text6.Text)
    DoEvents
End Sub

mx

<div>
use the LEN function to get the length<br />
len(FDDATA)
</div>


use the LEN function to get the length
len(FDDATA)

<div>
Thank you very much. &nbsp;Works like a dream
</div>


Thank you very much.  Works like a dream

<div>
you are welcome.<br />
<br />
mx
</div>


<div>
<div class="content wysiwyg-content">
I would like to count the number of characters entered in a access field, using VBA.<br />
The field I wish to count is called FDDATA and is a text field of 255 characters.<br />
I wish to show the person inputing how may characters remain for input counting down from 255 and display this result in an unbound field called fldCounterRemaining<br />
I would like to allow for deletions and backspaces to be taken into account.<br />
Could some give me a working routine.<br />
Thanks in advance
</div>
</div>


I would like to count the number of characters entered in a access field, using VBA.
The field I wish to count is called FDDATA and is a text field of 255 characters.
I wish to show the person inputing how may characters remain for input counting down from 255 and display this result in an unbound field called fldCounterRemaining
I would like to allow for deletions and backspaces to be taken into account.
Could some give me a working routine.
Thanks in advance

Count the characters entered in an MSAccess field and report the remaining characters to another field

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.