![]() |
|
Модераторы: Akina |
![]()
|
|
| Гость_sany |
|
|||
|
Unregistered |
Есть файл "1.txt", в котором есть надпись например---END, и есть проект Vb в котором текст---
Open "1.txt" For Input As 1 input #1, q Close q И как сделать так, что-бы при нажатии на кнопку на проекте команда из файла была выполнена!Т.е. нажимаю на кнопку, и выполняется команда END и происходит выход из программы! Заранее спасибо!!! |
|||
|
||||
| bom |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 329 Регистрация: 22.2.2004 Где: Казахстан, Алматы Репутация: 4 Всего: 6 |
Private Sub Command1_Click()
Select Case q Case "END" End Case "UNLOAD" Unload Me ' и т.д. End Select End Sub |
|||
|
||||
| cardinal |
|
|||
![]() Инженер ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 6003 Регистрация: 26.3.2002 Где: Германия Репутация: 19 Всего: 99 |
На всякий случай скажу, что строковую переменную q надо объявить глобально.
-------------------- Немецкая оппозиция потребовала упростить натурализацию иммигрантов В моем блоге: Разные истории из жизни в Германии "Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино". А. и Б. Стругацкие |
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |