Text Box Zoom Question

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a form with a text box that has:
..
Private Sub txtEntry_DblClick(Cancel As Integer)
DoCmd.RunCommand acCmdZoomBox
End Sub
..
When the zoom box displays, all the text is selected.

Is there a way to have the cursor display at the last character?
 
Use the following in the On Enter event to move it to the end:
Me!txtEntry.SelStart = Len(txtEntry)

OR Put the following in the On Enter event to move the cursor to the
beginning:
Me!txtEntry.SelLength = 0

Cindy
 
Back
Top