Hallo,
ich habe ein kleines Problem, ich versuche den Inhalt einer Textbox zu speichern
mit folgenden code
es funktioniert auch nur habe ich das problem wenn ich 2 mal auf den laden Button drücke, bekomme ich die Fehlermeldung "Datei schon geöffnet" wie kann ich das umgehen
mfg
ich habe ein kleines Problem, ich versuche den Inhalt einer Textbox zu speichern
mit folgenden code
Code:
Dim text As String
Private Sub laden_Click()
Open "C:\datei.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, text
Text1.text = Text1.text & vbNewLine & text
Loop
End Sub
Private Sub speichern_Click()
Open "C:\datei.txt" For Output As #1
Print #1, Text1.text
Close #1
End Subes funktioniert auch nur habe ich das problem wenn ich 2 mal auf den laden Button drücke, bekomme ich die Fehlermeldung "Datei schon geöffnet" wie kann ich das umgehen
mfg
