如何让vb程序在退出时自动打开一个网页？

在窗体的卸载事件也就是Unload事件中加入打开网址的命令就行，如下：

Private Sub Form_Unload(Cancel As Integer)
URL = "http://www.baidu.com"
Shell "explorer " & URL, 0
End Sub

Private Sub Form_Unload(Cancel As Integer)
Shell "explorer.exe http:\\www.baidu.com"
End Sub
这个是最简单的了。
我试过了，打开的是默认浏览器。