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同时废止。 本规范由我部标准定额研究所组织中国建筑工业出版社出版发行。 二○一○年八月十八日
|
|
查看所评论的日志:关于发布行业标准《高层建筑混凝土结构技术规程》的公告 |
tiancao1001 于 2010-10-29 10:46 AM 发表评论: |
|
查看所评论的日志:田草日志 |
tiancao1001 于 2010-10-27 04:18 PM 发表评论: |
全国民用建筑工程设计技术措施(结构)表18.1.7-1 檩条: 支承压型钢板和金属夹芯板屋面 1/200 有吊顶且抹灰 1/300
|
|
查看所评论的日志:轻钢屋面檩条挠度限值?? |
tiancao1001 于 2010-10-18 10:11 PM 发表评论: |
|
查看所评论的日志:田草日志 |
tiancao1001 于 2010-10-02 10:15 PM 发表评论: |
|
查看所评论的日志:田草日志 |