当我按了按钮，可以打开浏览器，连接去一个网站入tieba.baidu.com..

'偶在《奥运邮集》软件里采用了这个方法，代码提供如下：
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
    "ShellExecuteA" (ByVal Hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOW = 5
Private Sub Command1_Click()
Dim web As String '链接网站用,网址放在Combo1的属性Text中,
  web = Combo1.Text
  ShellExecute 0&, vbNullString, web, vbNullString, vbNullString, 0
End Sub

不需太复杂
Shell "explorer.exe http://tieba.baidu.com"

新手致谢

西山版主的方法确实简单,学习了

2楼的那个太复杂了

学习了`谢谢``