Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[18.218.70.93] |
|
Сообщ.
#1
,
|
|
|
Как завершить программу написаную на VBasic с кодом возврата отличным от 0?
|
Сообщ.
#2
,
|
|
|
Очевидно, только вызвав API функцию ExitProcess.
При этом следует учитывать следующее: 1) Если вызвать эту функцию при работе в режиме интерпретатора - завершится процесс VB6.EXE (т.е. сам VisualBasiс, а не только сама программа) 2) Вызов этой функции будет последней операцией как самой программы, так и Runtime VisualBasic, т.е. в отличие от оператора End, Runtime не закроет все файлы, не очистит все ссылки на внешние объекты и OCX-файлы и т.п. Поэтому перед вызовом ExitProcess следует по возможности выполнить все эти действия самостоятельно - т.е. закрыть все файлы (оператор Close без параметров), закрыть и выгрузить (оператор Unload) все формы - при этом выгрузятся все OCX и очистить все ссылки на объекты (Set Var=nothing). |
Сообщ.
#3
,
|
|
|
Dim frm as Form
For each frm in Forms Unload frm Next |
Сообщ.
#4
,
|
|
|
2Lamer: действительно,Lamer
|
Сообщ.
#5
,
|
|
|
al: Сектрке!!!!!!
|