private sub command1_click()shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE http://www.baidu.com"end sub 菜单:在窗体上右键->菜单编辑器
