Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
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