This code is not working for a text box. I'm just learning here so it may be
way off. I just want a the text to be in replace mode just like you would have
swipped it. "QtyPicked" is the name of the text box.
this does not work
Sub QtyPicked_Click()
QtyPicked.SelStart = 0
QtyPicked.SelLength = Len(QtyPicked.text)
End Sub
and this does not work also
Sub QtyPicked_GotFocus()
QtyPicked.SelStart = 0
QtyPicked.SelLength = Len(QtyPicked.text)
End Sub
--
You received this message because you are subscribed to the Google Groups
"nsb-ce" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/nsb-ce?hl=en.
