VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Code used for Windows Run box or IE4.0 combobox.

by P#0b1X (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 4.0 (32-bit)
Difficulty: Unknown Difficulty
Originally Published: Tue 19th October 1999
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Code used for Windows Run box or IE4.0 combobox.

Rate Code used for Windows Run box or IE4.0 combobox.



'into the KeyUp sub.
For X = 0 To combo1.ListCount
    Dim g
    g = Len(combo1.text)
    If combo1.text = Mid$(combo1.List(X), 1, g) Then
    combo1.text = combo1.List(X)
    combo1.SelStart = g
    combo1.SelLength = Val(Len(combo1.List(X))) - g
    Exit For
    End If
Next X

Download this snippet    Add to My Saved Code

Code used for Windows Run box or IE4.0 combobox. Comments

No comments have been posted about Code used for Windows Run box or IE4.0 combobox.. Why not be the first to post a comment about Code used for Windows Run box or IE4.0 combobox..

Post your comment

Subject:
Message:
0/1000 characters