| tiancao1001 于 2010-11-29 09:51 PM 发表评论： |
Option Explicit
Private Sub Command1_Click()
Command1.Enabled = False
WebBrowser1.Navigate2 Text1.Text
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim x As Long
List1.Clear
If Not WebBrowser1.Busy Then
DoEvents
End If
For x = 0 To WebBrowser1.Document.Links.length - 1
List1.AddItem WebBrowser1.Document.Links.Item(x)
Next x
Command1.Enabled = True
End Sub
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
Label3 = Text
End Sub |
|
| 查看所评论的日志：VB 读取网页源码并分析其中的URL |
| tiancao1001 于 2010-11-28 03:40 PM 发表评论： |
|
| 查看所评论的日志：田草日志 |
| tiancao1001 于 2010-11-25 10:59 PM 发表评论： |
|
| 查看所评论的日志：田草日志 |
| tiancao1001 于 2010-11-24 11:34 PM 发表评论： |
关于发布国家标准《混凝土结构设计规范》的公告
中华人民共和国住房和城乡建设部
公 告
第 743 号
--------------------------------------------------------------------------------
关于发布国家标准《混凝土结构设计规范》的公告
现批准《混凝土结构设计规范》为国家标准，编号为GB50010-2010，自2011年7月1日起实施。其中，第3.1.7、3.3.2、4.1.3、4.1.4、4.2.2、4.2.3、8.5.1、10.1.1、11.1.3、11.2.3、11.3.1、11.3.6、11.4.12、11.7.14条为强制性条文，必须严格执行。原《混凝土结构设计规范》GB50010-2002同时废止。
本规范由我部标准定额研究所组织中国建筑工业出版社出版发行。
二○一○年八月十八日
|
|
| 查看所评论的日志：关于发布行业标准《高层建筑混凝土结构技术规程》的公告 |
| hmxmylove 于 2010-11-22 03:47 PM 发表评论： |
|
| 查看所评论的日志：AutoCAD .net 开发人员手册 |
| shaofen2 于 2010-11-10 01:09 PM 发表评论： |
您好!
我现在学习cadvba2次开发,能不能发份给我啊!谢谢!
邮箱:shaofen2@163.com |
|
| 查看所评论的日志：AutoCAD VBA 二次开发教程源码 |
| shawon 于 2010-11-01 06:29 PM 发表评论： |
你好，麻烦发我一份吧，最近也在做这方面的东西，看了你的截图不错的  谢谢啊，我的邮箱是shawon@163.com |
|
| 查看所评论的日志：VB6.0 IE 多标签浏览器源码 |
| lj_87 于 2010-10-29 04:54 PM 发表评论： |
| 297189188@qq.com 麻烦发我邮箱，谢谢啦 |
|
| 查看所评论的日志：AutoCADVBA开发精彩实例教程-源代码(整理后) |
[50] [51] [52] [53] [54] [55] [56] [57] [58] [59] ... [143] 
