Can I Do This In Vb6 ?

Hello i have a upload script which uploads a text file into my listview3
The problem im having it if i do
1
2
3
in a not pad it will not work if i do
1 - 2

it will upload 1 but not 2 into listview3

I think its because im using a account uploaded

Here is the code

Private Sub Command3_Click()Dim frmNum As Integer       On Error GoTo cdError    Dim fNum%, tmpStr$    fNum = FreeFile()       With Form1.ComD        .Filter = "Text Files (*.txt)|*.txt"        .CancelError = True        .DialogTitle = "Load a list..."        .ShowOpen        Open .FileName For Input As #fNum        MyList = .FileName        MsgBox "Please wait while the accounts are loaded..", vbInformation, "Please wait.."                           Do While Not EOF(fNum)                Line Input #fNum, tmpStr                                           Line Input #fNum, tmpStr                    Dim tmpStr1() As String                    tmpStr1 = Split(tmpStr, " - ")                    Form1.ListView3.ListItems.Add , , tmpStr1(1)                    Command4.Caption = "Accounts: " & Form1.ListView3.ListItems.Count                                                                                 If Slow Then DoEvents            Loop                    Close #fNum    End WithcdError:End Sub