vb获得一页的html代码

2016-02-19 19:24 11 1 收藏

下面是个vb获得一页的html代码教程，撑握了其技术要点，学起来就简单多了。赶紧跟着图老师小编一起来看看吧！

【 tulaoshi.com - Web开发】

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

来源:https://www.tulaoshi.com/n/20160219/1620907.html

看过《vb获得一页的html代码》的人还看了以下文章更多>>

快速找到Word2007长文档的某一页

标签：电脑入门

在一篇有几章、几十节或长达几十、几百页的Word文档中，要想查看或修改某页的内容时，需要拨动滚轮或使用翻页键一点点向后查找，太麻烦，需要相当的眼力和耐心。其实有一个简单的方法。在Word 2007中打开文档，单击视图选项卡，在显示/隐藏组中把缩略图项勾选上，这时窗口左侧会出现一列文档各页内容的缩略图。接下来拖动左侧缩略图栏中的滚...

Excel 2010将不相邻区域打印在同一页

标签：电脑入门

有时候我们在Excel中不希望打印整张表格，只是想打印部分数据，例如要将多个不相邻区域的数据都打印在同一个页面上，在Excel 2010中该如何操作呢？ step01打开要打印的.xls表格文件。先给整张表做个视图，方法是点击视图菜单，单击工作簿视图区中的自定义视面按钮打开视图管理器，然后点右边的添加按钮，在弹出的添加视图对话框中输入一个视图...

用VB压缩Html

标签： Web开发

不知各位用过Slim Girl了没有，它是专门用来压缩那些Html超文本文件和脚本文件的软件。据说它的压缩率达到了15%以上，我试了一下，有的文件（大的）压缩率居然达到了50%。我拿压缩出来的文件和原文件对比了一下，嘿，好象只是简单地把空格，回车符和换行符去掉而矣。看来这个软件也没什么，我用VB就能做一个。不信？各位请看：首先...

替换HTML代码

将一些HTML替换掉 eg: strContent=strContent.Replace("&","&"); strContent=strContent.Replace("'","''"); strContent=strContent.Replace(" strContent=strContent.Replace(">",">"); strContent=strContent.Replace("chr(60)","<"); strContent=strContent.Replace("chr(37)",">"); strContent=strContent.Replace("\"",""")...

PPT不从第一页开始放怎么办