Suchergebnisse
Suchergebnisse 1-2 von insgesamt 2.
-
Private Sub Command1_Click() Nr = FreeFile Dateiname = "Text.txt" Open Dateiname For Input As #Nr Input #Nr, Text$ Close #Nr Text1 = Text$ End Sub
-
Private Sub Command1_Click() MsgBox "Geh auf" End Sub