Quick Text Select On GotFocus When working with data entry controls, the current value in the control often needs to be selected when the control received focus. This allows the user to immediately begin typing over any previous value. Her
Quick Text Select On GotFocus
When working with data entry controls, the current value in the control often needs to be selected when the control received focus. This allows the user to immediately begin typing over any previous value. Here注释:s a quick subroutine to do just that:
Public Sub FocusMe(ctlName As Control)
注释:
With ctlName
.SelStart = 0
.SelLength = Len(ctlName)
End With
注释:
End Sub
Now add a call to this subroutine in the GotFocus event of the input controls:
Private Sub txtFocusMe_GotFocus()
Call FocusMe(txtFocusMe)
End Sub
原文转自:http://www.ltesting.net