[AccessD] Limit Text in Field

Slick. My only criticism is that it waits for the user to go too far, rather than cautioning the user that he is about to go too far. (I tend toward guiding users to correctness rather than busting them for errors.) Perhaps your code could be modified to write the [length] + " of 255 characters allowed" to the status bar, so the user anticipates the error rather than commits it. 

Not a big deal. I like your solution. One of my mantras is, "Make the user feel like a dancer." That means preclude error to the best of my ability, and then of course deal with it should it occur.

A.

----- Original Message ----
From: John Bartow <john at winhaven.net>
To: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Sent: Tuesday, October 31, 2006 1:12:03 PM
Subject: Re: [AccessD] Limit Text in Field

Hi Virginia,

FWIW, here's the on change event procedure that I use with a fax form on
which the "regarding" line field (Text 255) is not long enough for a huge
description but the txtMessage field (Memo) is:

Private Sub txtRegarding_Change()
   'Comment: prevents user form adding too much text to the regarding line
   
   On Error GoTo Form_Open_ERR
   
   If Len(Me.txtRegarding.Text) > 255 Then
      MsgBox "The regarding line can only contain 255 characters, " & _
      "please use the message box for longer text."
      Me.txtRegarding.Text = Left(Me.txtRegarding.Text, 255)
   End If

Form_Open_EXIT:
   Exit Sub
   
Form_Open_ERR:
    MsgBox Err.Description
    Resume Form_Open_EXIT
    
End Sub

HTH
John B.

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com