| Вопрос: Запись в файл... | Добавлено: 02.04.05 16:09 |
Автор вопроса:  IVA
|
|
Объясните почему при "X as String" и "Y as String"...
................ f = FreeFile Open Environ("windir") & "\Path.dat" For Output As f Print #f, X Close #f f = FreeFile Open Environ("windir") & "\Path.dat" For Input As f Y = Input(LOF(f), f) Close f ................ А в результате "X" не равно "Y"... |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 03.04.05 11:48 |
|
Замени Print #f, X на Print #f, X;
|
||
|
Номер ответа: 2 Автор ответа: VladeD Вопросов: 8 Ответов: 40 |
Профиль | | #2 | Добавлено: 06.04.05 15:18 |
|
P.s.
A чему равен Х ?? Ты же присвоил имя переменной  im X As String
То при записи она долдна быть чему-то равна: Например X = "Ты же ошибаешься!" 'и далее f = FreeFile Open Environ("windir"  & "\Path.dat" For Output As f
Print #f, X Close #f 'А вот Y еще ничему не равна, ты ее получишь теперь, но со с\всеми потрохами: f = FreeFile Open Environ("windir" & "\Path.dat" For Input As f
Y = Input(LOF(f), f) Close f 'Y = "Ты же ошибаешься!" & vbnewline ' А если записать вот так: f = FreeFile Open Environ("windir" & "\Path.dat" For Input As f
Line Input #f, Y Close f 'теперь Y = "Ты же ошибаешься!" Вот так. |
||
Страница: 1 |