当前位置:编程学习 > VB >>

vb打开网页并输入关键字

比如说在窗体上有一个文本框,一个按钮,一个WebBrowser控件,在文本框中输入“周杰伦”,点击按钮,会在WebBrowser控件中打开网页(百度一下) --------------------编程问答-------------------- webbrowser 可以用dhtml对象的  你可以使用 javas 来操作页面的对象 只是提醒 如果你会web开发的可以用jquery框架 加载并调用 就行了 --------------------编程问答-------------------- 额,我是新手,能说具体点吗 --------------------编程问答-------------------- 在一个窗体里托放一个文本框、一个按钮和一个webbrowser,

代码如下:


Private Sub Command1_Click()
  WebBrowser1.Navigate "http://www.baidu.com"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  WebBrowser1.Document.Forms(0).wd.Value = Text1
End Sub


你所需要的,就是在webbrowser的documentComplete事件中编码 --------------------编程问答-------------------- 我去试试 --------------------编程问答--------------------  WebBrowser1.Document.Forms(0).wd.Value = Text1
对象变量或with 块变量未设置 --------------------编程问答--------------------
引用 5 楼  的回复:
 WebBrowser1.Document.Forms(0).wd.Value = Text1
对象变量或with 块变量未设置


Private Sub Command1_Click()
  WebBrowser1.Navigate "http://www.baidu.com"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  If URL = "http://www.baidu.com/" Then WebBrowser1.Document.Forms(0).wd.Value = Text1
End Sub --------------------编程问答--------------------
引用 6 楼  的回复:
引用 5 楼 的回复:

WebBrowser1.Document.Forms(0).wd.Value = Text1
对象变量或with 块变量未设置


Private Sub Command1_Click()
  WebBrowser1.Navigate "http://www.baidu.com"
End Sub

Private Sub WebBrowser1_Doc……
在Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)里在用
  If URL = "http://www.baidu.com/" Then ,除非你每次下载网页结束后就再次刷新
补充:VB ,  网络编程
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,