[AccessD] Retain trailing space when entering data

Gustav Brock gustav at cactus.dk
Thu Mar 23 11:07:58 CDT 2017


Hi all

I didn’t know this was possible using a form, but it is, in fact, easily done with only a few lines of code:

Private Sub Test_AfterUpdate()

    Debug.Print Test.Value & "<"
    Debug.Print Test.Text & "<"

    If Nz(Test.Value) <> Test.Text Then
        Test.Value = Test.Text
    End If

    Debug.Print Test.Value & "<<"
    Debug.Print Test.Text & "<<"

End Sub

You can even save blanks only.

/gustav


More information about the AccessD mailing list