西门子商城
西门子中国
黄金
本版热门话题
相关推荐
相关帖子推荐
恭喜，你发布的帖子
发布于 2025-12-23 10:30:18
10楼
或者使用Popup:
Dim MyShell,myPop
Set MyShell = CreateObject("Wscript.Shell")
MyShell.Popup "自动关闭弹窗指示", 5, "运行提示", 64 '5为自动关闭的时间长度5s,33为弹窗样式为YesNo形式，64为Ok
Set MyShell = Nothing
请填写推广理由：
分享
只看
楼主
