☰

Mensagem de erro agora aparecendo como camada superior

tag-icon • tag-icon vbscript
Mensagem de erro agora aparecendo como camada superior

Fiz um programa que deveria ficar aparecendo mensagens de erro e depois desaparecendo por conta própria, funciona, mas as mensagens de erro (após a primeira) geralmente ficam abaixo da janela atual aberta, fazendo com que ela não seja vista. Como posso fazer isso aparecer? Obrigado

Const TIMEOUT = 5
Set objShell = WScript.CreateObject("WScript.Shell")

Do Until True = False
    WScript.Sleep 3000
    objShell.Popup "Error1", TIMEOUT
Loop

informação relacionada