在vb中如何指定时间打开某个程序.?

发布网友发布时间：2023-09-23 06:22

共2个回答

热心网友时间：2024-11-24 18:50

在窗体里插入Timer控件

Private Sub Form_Load()
Timer1.Interval = 1000 '一定要1000
End Sub

Private Sub Timer1_Timer()
Dim s As String
Dim d As String
s = "13:00:00" '如果你的系统是12小时制就输入 1:00:00
d = CStr(Time)
If d = sThen
Shell ("你要运行的EXE文件的路径")
End If

End Sub

热心网友时间：2024-11-24 18:51

VBS就可以搞定，代码如下：
do
set wshell=wscript.createobject("wscript.shell")
if time="13:00:00" then
wshell.run "c:\1.exe"
end if
wscript.sleep 60000
loop
将以上内容保存为.vbs就可以了。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com