Ошибка считывания из файла - VB

Формулировка задачи:

Столкнулся с ошибкой чтения в переменную. Нажимаю на кнопочку "insetsave" - сохранение переменной происходит успешно(значение в txt файле отображается). Но вот когда нажимаю на "insetloadgame", компилятор выдаёт мне ошибку - "variable required - can't assign to this expression" и выделяет:
Private Sub insetloadgame_Click()
Open App.Path & "\save.txt" For Input As #1 
Input #1, Ingame.car ' <---
Close #1
"ingame.car" - здесь ingame - имя формы, car - имя переменной типа - string. Вот код программы:
Private Sub insetsave_Click()
Open App.Path & "\save.txt" For Output As #1 
Write #1, Ingame.car
Close #1 
End Sub
 
Private Sub insetloadgame_Click()
Open App.Path & "\save.txt" For Input As #1 
Input #1, Ingame.car 
Close #1 
End Sub
Не знаю что и делать... Может есть у кого мысли, в чём здесь дело?


textual

Код к задаче: «Ошибка считывания из файла - VB»

Private SUB insetsave_Click()
car = "123drgs"
Open App.Path & "\save.txt" For Output As #1
Write #1, car
Close #1
END SUB
 
Private SUB insetloadgame_Click()
If Dir(App.Path & "\save.txt") <> "" Then
Open App.Path & "\save.txt" For Input As #1
Input #1, car
Close #1
Print car
Else
MsgBox "Not"
End If
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 3.778 из 5

Источник
Похожие ответы