Как показать окно уже запущенного приложения при его повторном запуске? - VB

Узнай цену своей работы

Формулировка задачи:

Я использую такой код, но он не отрабатывает, проверял какой hwnd возвращает FindWindow - 0, соответственно ничего не отрабатывает. Подскажите где может быть ошибка.

Решение задачи: «Как показать окно уже запущенного приложения при его повторном запуске?»

textual
Листинг программы
If App.PrevInstance = True Then
    MsgBox 'Программа уже запущена!', vbInformation, 'Info'
    mem = App.title
    App.title = ''   ' <<< чтобы не было двух окон с одним заголовком
    AppActivate mem  ' <<< активируем окно запущенной копии
    Exit Sub         ' <<< завершаем работу этой копии программы
End If

Оцени полезность:

12   голосов , оценка 3.833 из 5
Похожие ответы