... Pague apenas R$47,00 uma única vez e tenha acesso por 1 ano aos vídeos e arquivos exemplos do site ...

Clique aqui e obtenha mais detalhes.


Criar caixa de mensagem temporizada

Com o Script do Windows é possível criar uma caixa de mensagem temporizada.    Veja como é simples o código:

Public Function MsgBoxTimer(Seconds As Integer, Prompt As String, _
Optional Buttons As VbMsgBoxStyle = vbOKOnly, _ 
Optional Title As String) As VbMsgBoxResult
Dim wshell As Object
Set wshell = CreateObject("WScript.Shell")
MsgBoxTimer = wshell.PopUp(Prompt, Seconds, Title, Buttons)
End Function

Exemplo de chamada da função, configurada para dois segundos:

MsgBoxTimer 2,"Teste com a caixa de mensagem...", vbOKOnly, "Aviso"


 

Bom estudo!


 

 


Não há comentário

Envie seu comentário: