cghoga's suggestion will work perfectly if the textbox is bound to a field in a table. If you're using unbound controls, you'll need to do a bit of coding. Something like this:
Private Sub MyTextBox_AfterUpdate
Dim strA as String
strA = Left(MyTextBox & Space(250), 250)
MyTextBox = strA
End Sub