Highlight Entire Textbox
Highlight textbox/combobox and its entire contents. Simple but cosmetically useful.
AI
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.
源代码
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
原始评论 (3)
从 Wayback Machine 恢复