手机
当前位置:查字典教程网 >网页设计 >脚本HTML教程 >vb获得一页的html代码
vb获得一页的html代码
摘要:PrivateSubCommand1_Click()WebBrowser1.Navigate"http://localhost/"Timer...

 Private Sub Command1_Click()

WebBrowser1.Navigate "http://localhost/"

Timer1.Enabled = TrueEnd Sub

Private Sub Timer1_Timer()

Dim doc, objhtml As Object

Dim i As Integer

Dim strhtml As String

If Not WebBrowser1.Busy Then

Set doc = WebBrowser1.Document

i = 0

Set objhtml = doc.body.createtextrange()

If Not IsNull(objhtml) Then

Text1.Text = objhtml.htmltext

End If

Timer1.Enabled = False

End IfEnd Sub

【vb获得一页的html代码】相关文章:

关于几个HTML文档接口的使用

HTML网页头部代码全接触

16进制颜色代码大全

HTML网页头部代码

中文Web设计HTML的em标记使用

网页制作中使用规范的HTML代码的几点

把Word转为简洁的html的若干种方法

Html页面插入flash代码

为什么要使用html的meta标签?

python获取标准北京时间的方法

精品推荐
分类导航