vb 做个窗口,显示网页内容
首先要添加一个Microsoft
成都创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站建设、网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的新吴网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
Web浏览器
控件
sub
page_load()
try
AxWebBrowser1.Anchor=AnchorStyles.Top
or
AnchorStyles.Botton
or
_
AnchorStyles.Left
or
AnchorStyles.Right
AxWebBrowser1.Navigate(ComboBox1.Text)'地址栏
catch
ex
as
exception
Msgbox(ex.Message)
end
try
end
sub
sub
ComboBox1_SelectedIndexChanged()
AxWebBrowser1.Navigate(combobox1.text)
end
sub
sub
combobox1_keypress()
if
asc(e.keychar)=system.windows.forms.keys.enter
then
AxWebBrowser1.Navigate(combobox1.text)'响应回车,开始连接
end
if
end
sub
以上是在vb.net环境的代码,在vb中控件的命名肯能有点不同,比如combobox在vb中是combox.
如何用vb.net获取网页源代码
使用webbrowser控件来加载网页,然后再
Private
Sub
WebBrowser
1_DocumentCompleted下通过使用WebBrowser1.Document.Body.
InnerHtml
来获取网页的源代码,或使用
WebBrowser1.Document.Body.InnerText来获取网页中的文本。之后可以通过字符串控制指令或者
正则表达式
来精确获取到你所需的数据。
VB程序中显示网页
想只显示一部分的话可以用“Scriplet”控件(工具箱右键-“部件...”-“Windows HTML Object Libary”),然后在属性窗口填URL地址,很简单。
想显示全部可以用webbrowser控件来实现。
VB.net使用WebBrowser控件显示网页
当然不行,那个是整个网页的
要这样
web1=webbrowser1
For i = 0 To Web1.Document.All.Count - 1
'要具体判断是哪个控件还要看这两个
'Web1.Document.All(i).TagName
'Web1.Document.All(i).Name
Text1.Text=Web1.Document.All(i).InnerText
Next i
如何用vb.net获得网页的源代码
Dim url As String=" 网址"
Dim httpReq As System.Net.HttpWebRequest
Dim httpResp As System.Net.HttpWebResponse
Dim httpURL As New System.Uri(url)
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpReq.Method = "GET"
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
httpReq.KeepAlive = False ' 获取或设置一个值,该值指示是否与
Internet资源建立持久连接。
Dim reader As StreamReader = _
New StreamReader(httpResp.GetResponseStream,
System.Text.Encoding.GetEncoding(-0))
Dim respHTML As String = reader.ReadToEnd() 'respHTML就是网页源代码
新闻名称:包含vb.net原码显示网页的词条
URL链接:http://scgulin.cn/article/hjscho.html