Clicking the OK button on a MessageBox if user doesn't do it

[jmsrickland]

One-liner based on the Popup method of the WshShell object.

CreateObject("WScript.Shell").Popup "Don't click me!", 5, "Auto-OK MsgBox", vbOKOnly Or vbInformation

Problem: When I added a Statusbar control to the Form the message box no longer works; it stays static and the button must be clicked to close it