VB怎么用文本框+按钮做一个百度搜索框？直接搜索的！
展开全部
Private Sub Command1_Click()
Dim url As String
url = "http://www.baidu.com/#wd="
url = url & Text1.Text
url = url & "&rsv_spt=1&issp=1&rsv_bp=0&ie=utf-8&tn=baiduhome_pg&rsv_sug3=3&rsv_sug4=85&rsv_sug1=3&rsv_sug2=0&inputT=1861"
WebBrowser1.Navigate url '相当于组织搜索的页面地址，然后打开即可
End Sub
Dim url As String
url = "http://www.baidu.com/#wd="
url = url & Text1.Text
url = url & "&rsv_spt=1&issp=1&rsv_bp=0&ie=utf-8&tn=baiduhome_pg&rsv_sug3=3&rsv_sug4=85&rsv_sug1=3&rsv_sug2=0&inputT=1861"
WebBrowser1.Navigate url '相当于组织搜索的页面地址，然后打开即可
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
