| Вопрос: Открыть файл | Добавлено: 22.06.07 20:24 |
Автор вопроса:  Annie
|
|
нужно открыть ч/з кнопку документ.
Private Sub CommandButton1_Click() Open "D:\Документация.chm" For Input As #1 Close #1 End Sub однако при нажатии кнопки события не возникает. Так в чем ошибка? |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  APS ICQ: 234458121 Вопросов: 38 Ответов: 107 |
Профиль | | #1 | Добавлено: 22.06.07 21:41 |
|
Данная команда работает только для текстовых файлов.
Что ты собрался добавлять в этот файл? |
||
|
Номер ответа: 2 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #2 | Добавлено: 22.06.07 22:29 |
|
Переводу построчно
Open "  :\Документация.chm" For Input As #1 '<<Открыть файл для чтения
Close #1 '<<Закрыть этот файл Никакого события при этом возникать и не должно. Советую топстартеру почитать доки по работе с файлами.. <telepat mode> See API function ShellExecute </telepat mode> |
||
|
Номер ответа: 3 Автор ответа: Annie Вопросов: 19 Ответов: 40 |
Профиль | | #3 | Добавлено: 25.06.07 07:29 |
|
этот способ работает
Shell "cmd /X /C start D:\Документация.chm" какие ещё есть предложения(апи ShellExecute не понятна)? |
||
|
Номер ответа: 4 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #4 | Добавлено: 25.06.07 16:36 |
| Если тебе не понятна какая-то API, следует воспользоваться MSDN | ||
|
Номер ответа: 5 Автор ответа: vbdumperВопросов: 5 Ответов: 51 |
Web-сайт: Профиль | | #5 | Добавлено: 11.07.07 14:01 |
|
On Error GoTo Error Handler
Dim FileNum As Integer FileNum = FreeFile Open FileNum [FILE] For Input As #FileNum [TextBOX].Text = FileNum Close #FileNum |
||
Страница: 1 |