Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Jul 31, 1998

Select Text-Box Contents on Entry Automatically

Many commercial apps select the contents of the text box automatically whenever it gets focus. You can do the same in your apps with a few VB statements. Invoke the SelStart and SelLength functions within a TextBox control's GotFocus event:

 Private Sub Text1_GotFocus()
		Text1.SelStart = 0
		Text1.SelLength = Len(Text1)
	End Sub

Or place the code in a public Sub procedure and call it from any text box in your project:

 Private Sub Text2_GotFocus()
		PreSel Text2
	End Sub
	Public Sub PreSel(txt As Control)
		If TypeOf txt Is TextBox Then
			txt.SelStart = 0
			txt.SelLength = Len(txt)
		End If
	End Sub

Because you can call the PreSel procedure from anywhere, you should limit the procedure to acting on TextBox controls to prevent errors. The TypeOf function tests if you've passed the procedure a TextBox control, and if not, it skips over the selection code.

Ron Schwarz
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date