Запустить программу и ждать завершения, не вешая основной программы - VB
Формулировка задачи:
Мне нужно запустить программу и дождаться её завершение, после продолжить работу
Вот что я нашел, для реализации этого.
Код работает, но окно основной формы перестает перерисовываться. Возможно ничего страшного нет, но выглядит не красиво и кажется что всё повисло. Что поправить в коде или подскажите другой способ для реализации этой идеи ?
Решение задачи: «Запустить программу и ждать завершения, не вешая основной программы»
textual
Листинг программы
'...58 If CreateProcessA(CreateProcessA 0&, FileName, 0&, 0&, 1&, NORMAL_PRIORITY_CLASS, 0&, 0&, Prog, Process) = 0 Then Unload Me: Exit Sub CloseHandle Process.hThread Do DoEvents 'Здесь можно подвигать какой нибудь прогресс бар Loop Until WaitForSingleObject(Process.hProcess, 20) = 0 '59...
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д