Dariusz Myszkowski A Schools
Temat: Czasowy popup
Czy istnieje możliwość wyświetlenia popupu, który po czasie np. 1-2 sekundy zniknie?W sieci znalazłem to:
Dim AckTime As Integer, InfoBox As Object
Set InfoBox = CreateObject("WScript.Shell")
'Set the message box to close after 10 seconds
AckTime = 10
Select Case InfoBox.Popup("Click OK (this window closes automatically after 10 seconds).", _
AckTime, "This is your Message Box", 0)
Case 1, -1
Exit Sub
End Select
...ale i tak trzeba ręcznie zamknąć okienko...