Data update not shown after change event 1

[oticonaus]

I have 2 text boxes. txtA allows a message to be typed in. txtB shows the number of characters in txtA. However, I want the value in txtB to update as each character is typed in (or deleted) much like an SMS message. The following code only updates the value in txtB on the first key press in txtA. Do I need to refresh txtB somehow?

Private Sub txtInvestigation_Change()
    Me.txtCommentCount.Value = Len(Me.txtInvestigation)
End Sub

 

[PHV]

Me.txtCommentCount.Value = Len(Me.txtInvestigation.Text)

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886