[VB6] Problema con lo split

[jack61]

Utilizzando lo split di una stringa presa da un file sys esterno, mi carica fino a non so quanti caratteri, avrei bisogno di aumentarli oppure di aggirare questo problema. Praticamente sto facendo un programma per l'ascolto della radio, ma mentre carico i link me li taglia.
Ecco il codice:

Dim inif As New clsIniF
Private Sub ErrMSG(Testo As String, Tipo As String)
MsgBox Testo, Tipo, ""
End Sub

Private Sub LoadRadios()
Dim s As String
Dim ListaRadio As String
Dim i As Integer
Dim FileInQuestion As String
      
FileInQuestion = Dir("config.ini")
If FileInQuestion = "" Then
     MsgBox "Errore n°001 - Impossibile trovare il file di configurazione. Vedi info sulla risoluzione nel menu Help>Errori.", vbCritical + vbOKOnly
     Exit Sub
Else


ListaRadio = inif.LeggiIni("File", "lista", "config.ini")

If ListaRadio = "" Then
    ErrMSG "Errore n°002 - Impossibile caricare la lista radio. Vedi info sulla risoluzione nel menu Help>Errori.", vbOKOnly + vbCritical
    Exit Sub

Else
    FileInQuestion = Dir(ListaRadio)
    
    If FileInQuestion = "" Then
        MsgBox "Errore n°003 - Impossibile trovare la lista radio. Vedi info sulla risoluzione nel menu Help>Errori.", vbCritical + vbOKOnly
        Exit Sub
    Else

    s = inif.LeggiIni("Radio", "list", ListaRadio)
    Dim words() As String

    words() = Split(s, "|")

    Dim tempStr As String
    For i = 0 To UBound(words)

    tempStr = Replace(words(i), ",", "")
    
    
    
    If Len(tempStr) > 0 Then
        Form2.Text1(i).Text = tempStr
    End If
    Next
End If
End If
End If
End Sub
Private Sub CheckFile(Filename As String)
      Dim FileInQuestion As String
      FileInQuestion = Dir(Filename)
      If FileInQuestion = "" Then
         MsgBox "No such file!"
         Exit Sub
      Else
         MsgBox "File exists!"
      End If
   End Sub


Private Sub FileEsci_Click()
Unload Me
End Sub

Private Sub Form_Load()
LoadRadios

End Sub

Private Sub HelpErrori_Click()
Form2.Show

End Sub

Nel file .sys invece vi è:

[Radio]
list=Virgin Radio|http://151.1.245.1/20|m2o|http://live.mediaserver.kataweb.it/m2o|R101|http://www.r101.it/r101/statici/diretta/r101.asx|

Quando però vado a caricare i link mi arriva fino a "liv" del link di "m2o".... Come posso risolvere?