codice:
Dim stringa As String

    
Private Sub Command1_Click()

If Not EOF(1) Then
Line Input #1, stringa
End If

 Dim line() As String
    Dim i As Long
     line = Split(stringa, vbLf)
     

     
     
End Sub

Private Sub Form_Load()
Open "services" For Input As #1
End Sub
come faccio poi ad aggiungere ogni riga letta ad una listbox o textbox?