Advanced Search

Return to Snippet

Revision: 24433
at March 1, 2010 16:05 by CaptainProton
Initial Code 
Public Function isFoundInListbox(list As listbox, item As String) as Boolean
  Dim i As Long

  For i = 0 To list.ListCount - 1
    If (list.ItemData(i) = item) Then
      isFoundInListbox = True
      Exit Function
    End If
  Next i

  isFoundInListbox = False
End Function
Initial URL 

                                

                                                            

                                    

                                        

                                        Initial Description
                                        

                                    

                                    
This method checks whether a ListBox contains a certain item (based on its text).

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
isFoundInListbox(listbox, String) as Boolean

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    
find

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Visual Basic