Hi,
I use the following to automatically select and copy the contents of a text box when it is clicked.
It's not exactly what you are asking for but it might help or give an idea.....
Good luck!
Andy
Private Sub Lastname_Click()
SelectText Me!Lastname
End Sub
Sub SelectText(ctlName As Control)
ctlName.SetFocus
ctlName.SelStart = 0
ctlName.SelLength = Nz(Len(ctlName), 0)
RunCommand acCmdCopy
End Sub
__._,_.___
Please zip all files prior to uploading to Files section.
.
__,_._,___
Tidak ada komentar:
Posting Komentar