Access 2007 - cycling through values in a list box VBA?

Question

So i have a list box that populates with different sets of data based on user selections.

How can I cycle through any given values that may be in the list box? Is this a For Each statement, or what?

Please help thanks justin

Answer 1

Here is how you iterate through the ListBox:

Dim i as Integer

For i = 0 to Me.ListBoxName.ListCount -1
   'Access easch item with 
   'ListBoxName.List(i)
Next i

Answer 2

You can do you a For loop to examine each row in the listbox, and do whatever with the rows which are selected. In this example, I display the second column from selected items in the lstLocations listbox. (Column numbering starts with zero.)

Private Sub cmdShowSelections_Click()
Dim lngRow As Long
Dim strMsg As String

With Me.lstLocations
    For lngRow = 0 To .ListCount - 1
        If .Selected(lngRow) Then
            strMsg = strMsg & ", " & .Column(1, lngRow)
        End If
    Next lngRow
End With

' strip off leading comma and space '
If Len(strMsg) > 2 Then
    strMsg = Mid(strMsg, 3)
End If
MsgBox strMsg
End Sub