| Вопрос: Хелп | Добавлено: 16.12.09 17:31 |
Автор вопроса:  ηikolaŠ~rus | ICQ: 604058327 |
|
Здрасте!
Dim F As Long Dim MyText As String Dim AllMyText As String Private Sub Command1_Click() F = FreeFile Open App.Path & "\1.txt" For Input As #F Line Input #F, MyText Text1.Text = MyText Close #F End Sub не хочет открывать файл подскажите как правильнее написать ,чтоб работало |
| Ответы | Всего ответов: 9 |
|
Номер ответа: 1 Автор ответа:  AWP ICQ: 345685652 Вопросов: 96 Ответов: 1212 |
Web-сайт: Профиль | | #1 | Добавлено: 16.12.09 17:52 |
|
||
|
Номер ответа: 2 Автор ответа: ηikolaŠ~rus ICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #2 | Добавлено: 16.12.09 17:55 |
| а можно комментарии | ||
|
Номер ответа: 3 Автор ответа: ηikolaŠ~rusICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #3 | Добавлено: 16.12.09 17:57 |
| мне не понятно где писать имя файла который ты открываешь?? | ||
|
Номер ответа: 4 Автор ответа: AWPICQ: 345685652 Вопросов: 96 Ответов: 1212 |
Web-сайт: Профиль | | #4 | Добавлено: 21.12.09 17:09 |
| А переменная FileName тебе не о чём не говорит? | ||
|
Номер ответа: 5 Автор ответа: ηikolaŠ~rusICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #5 | Добавлено: 21.12.09 18:00 |
| имя файла | ||
|
Номер ответа: 6 Автор ответа: ηikolaŠ~rusICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #6 | Добавлено: 21.12.09 18:06 |
| Binary---- ето что | ||
|
Номер ответа: 7 Автор ответа: ηikolaŠ~rusICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #7 | Добавлено: 21.12.09 19:31 |
| ауууууу | ||
|
Номер ответа: 8 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #8 | Добавлено: 21.12.09 19:51 |
| binary - побайтовое чтение / запись | ||
|
Номер ответа: 9 Автор ответа: ηikolaŠ~rusICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #9 | Добавлено: 21.12.09 20:25 |
| Спасибо | ||
Страница: 1 |