Slt utilises ceci:
Function Message_Temporaire(Message As String, TpsenSeconde As Integer, TitreMessage As String)
CreateObject("WScript.Shell").PopUp Message, TpsenSeconde, TitreMessage
End Function
Sub mamacro()
nib = Message_Temporaire("Salut ", 2, "Hello")
End Sub