Gemme data via RC232 og MSComm

Jeg har en RS232 opkobling til et instrument. Efter måling af en prøve kan jeg tømme instrumentets ene kanal ved at afsende kommandoen %n (hvor n angiver antallet af datapunkter)

Det jeg behøver er syntaksen til at tømme kanalen samt gemme data i en allerede oprettet tekstfil.

Jeg har en procedure hvor brugeren opretter et bibliotek og en tekstfil, hvor data så senere skal gemmes i:

Private Sub Opretdatafil_Click()
Set myFSO = New FileSystemObject
  If myFSO.FileExists("C:\" & bibliotek & "\" & fil & ".txt") Then
    MsgBox "Filen findes allerede"
  Else
  myFSO.CreateTextFile "C:\" & bibliotek & "\" & fil & ".txt"
  End If
  Set myFSO = Nothing
End Sub


Herefter proceduren til start af instrument og lagring af data



Private Sub Kørprøve_Click()
Dim instrumentstatus As Integer
instrumentstatus = MsgBox("Har du placeret en prøve i instrumentet, samt sat de rette instrument indstillinger?", vbYesNo, "Instrumentindstillinger")

Select Case instrumentstatus

Case 6
MSComm1.PortOpen = True
MSComm1.Output = "R" 'giver remote adgang til instrument
MSComm1.Output = "A" 'starter måling af prøve

gemfil = MsgBox("Tryk Ok for at gemme resultatfilen, når målingen er færdig", vbOKCancel, "Gem datafil")

    Select Case gemfil
   
        Case 1
       
        'gem data fra kanal 0 i txtfil som er oprettet af brugeren - det er her jeg behøver hjælp!