重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb.net开发网页内容 vbnet web窗体

vb.net 整个网站开发教程

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

创新互联2013年至今,先为丹阳等服务建站,丹阳等地企业,进行企业商务咨询服务。为丹阳企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

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

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

如下图:

求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

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 web窗体
分享URL:http://cqcxhl.com/article/dodhchd.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP