vb.net开发网页内容 vbnet webbrowser

求VB.NET读取网页内容写法

Imports System.Net

Imports System.IO

Imports System.Text.RegularExpressions

Public Class Form1

Private Sub button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim stream As IO.Stream = WebRequest.Create(UrlAdress).GetResponse().GetResponseStream()

'注意urladress为你上面的网页地址。

Dim sr As StreamReader = New StreamReader(stream, System.Text.Encoding.UTF8)

Label1.Text = Regex.Match(sr.ReadToEnd, "回答采纳率").ToString

'sr。readtoend读取网页流到末尾，即使用正则表达式从网页流中提取“回答采纳率”，赋值给Label1.Text ‘没有则为空

sr.Dispose() '关闭流

End Sub'要提取什么东西用正则表达式最好

End Class

相关问答

Q1: 如何用vb.net进行网站开发

打开VS , 选择VisualBasic -- Web -- ASP.NET Web 应用程序

如下图:

Q2: vb.net 整个网站开发教程

建议到书店去看看，大一点的书店，这样的书挺多的，网上的大多都不太好，也不完整，最好找那种有开发步骤的，而不是净粘一堆代码的，这种东西有个大体框架，知道怎么个过程就够了，具体开发细节一步步摸索，教程里的东西大多都运行不了，再说一步步照着做也没什么长进

Q3: 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开发网页内容的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet webbrowser、vb.net开发网页内容的信息别忘了在本站进行查找喔。