Advertisement
6_2008-2009 Miscellaneous #203879

Highlight Entire Textbox

Highlight textbox/combobox and its entire contents. Simple but cosmetically useful.

AI

Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Zdrojový kód
original-source
Public Sub Focus(varX As Variant)
'selects entire txtbox
 With varX
  If .Text <> "" Then
   .SelStart = 0
   .SelLength = Len(.Text)
  End If
 End With
End Sub

''''''''''''''''''''''''''''''''''''
call statement
''''''''''''''''''''''''''''''''''''
Private Sub txtStoreNo_GotFocus()
 Focus txtstoreno
End Sub
Původní komentáře (3)
Obnoveno z Wayback Machine