求:vb如何让第一个程序运行后第2个程序自动运行啊?

Question

我初学VB编辑了2个程序 怎么能让第一个程序运行后第2个程序可以自行运行,最好是第一个程序运行后过几秒第2个程序再自动运行,请各位高手帮帮我.
牛A的我试了能行 但是要是想在不确定第2个程序的路径的情况下如问题说述的执行它有办法吗？

Answer 1

在第一个程序的窗体上放一个timer代码如下

Private Sub Form_Load()
Timer1.Interval = 3000
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Shell "c:\asdf.exe" '你第二程序的路径
Timer1.Enabled =False
End Sub

这样你第一个程序运行3秒后,启动第二个程序

Answer 2

把以下代码放入要执行这个功能的控件的单击或其它事件内:

Timer1.Interval = 5000 '设置Timer1的时间间隔为5秒
Timer1.Enabled = True '设置Timer1为可用状态

比如在窗体1装载时运行代码就为:
Private Sub Form_Load()

Timer1.Interval = 3000
Timer1.Enabled = True

End Sub

在第一个程序的窗体上放一个timer代码如下:
如果是在同一个VB程序内:

Private Sub Timer1_Timer()

Form2.show'打开窗体2
Timer1.Enabled =False '设置Timer1为不可用

End Sub

如果是运行硬盘上的另外一个可执行文件,则Timer1的代码如下:

Private Sub Timer1_Timer()

Shell "c:\abcd.exe" '运行路径为 c:\abcd.exe的文件
Timer1.Enabled =False '设置Timer1为不可用

End Sub本回答被提问者采纳

Answer 3

不确定路径的情况下上帝也不知道你要运行哪一个。
不过，windows是有默认路径的说法的：当你只给出prog2.exe时，windows会自动在当前目录、windows系统目录和system32目录下找，找到的话就执行。