Nybörjarfel: .List()

[Vide]

Hejsan,

Har en liten kodsnutt som genererar ett fel som jag inte riktigt förstår varför:

Private Sub SelectUsers_Click()
  Dim strText As String
  Dim i As Integer

  For i = 0 To Users.ListCount
    If Users.List(i).Selected Then
      strText = strText & Users.List(i) & vbCrLf
    End If
  Next

  UsersLabel.Caption = strText
End Sub

Felmeddelande: "Invalid qualifyer"

Mvh, Vide