skrive indhold fra filelistbox

hejsa.

Hvordan kan jeg få vb til at skrive indholdet fra en filelistbox til en textfil, jeg har koden der skriver til textfilen, men mangler at finde ud af hvordan man skriver indholdet fra filelistbox til textfilen

Min kode indtil videre

Private Sub cmdTxtfil_Click()
    Dim filnummer As Integer
    Dim filnavn As String
   
    'unikt filnummer findes her
    filnummer = FreeFile
    'fil oprettes her
    filnavn = "c:\text.txt"
   
    Open filnavn For Output As #filnummer
        Print #filnummer, "hejsa /r min ven"
    Close #filnummer
   
   
End Sub

Private Sub Command1_Click()
    'Lukker programmet
    End
End Sub

Private Sub Dir1_Change()
    File1.path = Dir1.path
End Sub

Private Sub Drive1_Change()
    Dim path As String
    path = Drive1.Drive
    Dir1.path = path
End Sub

Nogen der ved hvordan ?

Og lige en til, når jeg nu skriver til txt fil, hvordan kan jeg så lave linieskift i dem ?