包含vb.net原码显示网页的词条

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原码显示网页的词条
转载源于：http://jkwzsj.com/article/hjscho.html