• Home
 · 
• Miscellaneous
 · 
• How to Quickly Search a List Box. Without using API Calls

How to Quickly Search a List Box. Without using API Calls

How to Quickly Search a List Box. Without using API Calls

Rate How to Quickly Search a List Box. Without using API Calls

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

    List1.AddItem "vijay"
    List1.AddItem "kumar"
    List1.AddItem "viju"
    List1.AddItem "mahi"
    List1.AddItem "mahesher"
    List1.AddItem "ravi"
    List1.AddItem "varma"
    Text1.Width = List1.Width
    List1.Visible = False
End Sub

Private Sub Text1_Change()
List1.Visible = True
    For intItem = 0 To List1.ListCount - 1
        If LCase(Text1.Text) = Left(LCase(List1.List(intItem)), Len(LCase(Text1.Text))) Then
            List1.ListIndex = intItem
            Exit For
        End If
    Next
End Sub