VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



*** Activate Auto Selection by this simple code for TextBox Objects ***

by Ayan Chaudhuri (8 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Tue 2nd April 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)

*** Activate Auto Selection by this simple code for TextBox Objects ***

Rate *** Activate Auto Selection by this simple code for TextBox Objects ***



Dim I As Integer
For I = 0 To Me.Count - 1
    If TypeOf Me.Controls(I) Is TextBox Then
        Me.Controls(I).SelStart = 0
        Me.Controls(I).SelLength = Len(Me.Controls(I))
    End If
Next
End Sub

Private Sub Form_Load()
Timer1.Interval = 10000
End Sub

Private Sub Timer1_Timer()
Dim I As Integer
For I = 0 To Me.Count - 1
    If TypeOf Me.Controls(I) Is TextBox Then
        Me.Controls(I).SelStart = 0
        Me.Controls(I).SelLength = Len(Me.Controls(I))
    End If
Next
End Sub


Download this snippet    Add to My Saved Code

*** Activate Auto Selection by this simple code for TextBox Objects *** Comments

No comments have been posted about *** Activate Auto Selection by this simple code for TextBox Objects ***. Why not be the first to post a comment about *** Activate Auto Selection by this simple code for TextBox Objects ***.

Post your comment

Subject:
Message:
0/1000 characters