How do you get the selected item from a listbox? I'm using Access 2007. So far I have this:

Private Sub lstGroups_AfterUpdate()

    Dim lngRow As Long
    Dim strMsg As String
    
    With Me.lstGroups
        
        For lngRow = 0 To .ListCount - 1
            If .Selected(lngRow) Then
                strMsg = strMsg & ", " & .Column(1, lngRow)
            End If
        Next lngRow
    
    End With
      
End Sub

But the IF statement is never true unless multiselect is on.

Thanks