Code:
Private Sub Command11_Click()

    Dim strFile As String
    strFile = SelectFileToLoad(CD)
    If Len(strFile) > 1 Then
        Call TextFileToList(strFile, ListofUsernames)
    Else
        MsgBox "Please Select a File!", vbInformation, "Error!"
    End If

End Sub
I have a text file with a list of user names, and yet it won't load into my list box 'ListofUsernames'