Inhalt einer Variabel in eine txt Datei schreiben

Da wir jetz schon so beim Thema sind, kann mir jemdand verraten warum dieser Code nicht funktioniert?

Code:
Private Sub Command1_Click()
  Dim F As Integer
  F = FreeFile
  Open "C:\" & Format$(Now, "dd-mm-yy hh-mm-ss") & _
    ".txt" For Output As #F
 
  ' Inhalt speichern (z.B. den Text einer TextBox)
  Print #F, Text1.Text
  Close #F
End Sub
 
Zurück