hnrbg的个人资料 - RAT

hnrbg hnrbg

关注数: 46 粉丝数: 21 发帖数: 332 关注贴吧数: 19

躺着双腿齐，坐起来左腿长，什么原因躺着双腿齐，坐起来左腿长，什么原因

vb,web控件做的浏览器为什么打不开这个网页

WPS表格, 如A1的值是1,在B1中显示1 如A1的值是2,在C1中显示2 如A1的值是3,在D1中显示3

看一看这里怎么样？

看一看这地的风水

马兰士hx260对讲机如何写频马兰士hx260对讲机如何写频

2003年的省委党校的毕业证可以报考注册会计师吗？ 2003年的省委党校的毕业证可以报考注册会计师吗？

在TEXT1控件中有3个数字，如何让这3个数字分别对应3个text控件显示出来。

77年生，男，问事业和健康

WebBrowser1_DocumentComplete循环获取网页数据的问题 Private Sub WB_DocumentComplete(ByVal pDisp As Object, URL As Variant) If URL = "http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.ceic.ac.cn%2F&urlrefer=4dd14ded2d70afc38510c899d6fa95a8" Then Dim str As String Me.Caption = "加载数据完成！" Dim a As IHTMLElementCollection Dim Tabel As HTMLTable Set a = wb.Document.getElementsByTagName("table") Set Table = a.Item(2) Dim Row As HTMLTableRow, Cell As HTMLTableCell Set Row = Table.rows(0) Dim jfuj As String '时间 jfuj = Row.cells(1, 0).innerText & vbCrLf Text1.Text = Text1.Text & jfuj Dim xcya As String '经度 xcya = Row.cells(4, 0).innerText & vbCrLf Text2.Text = Text2.Text & xcya Dim xfya As String '纬度 xfya = Row.cells(3, 0).innerText & vbCrLf Text3.Text = Text3.Text & xfya Dim fbxe As String '震级 fbxe = Row.cells(2, 0).innerText & vbCrLf Text4.Text = Text4.Text & fbxe Dim ipya As String '深度 ipya = Row.cells(5, 0).innerText & vbCrLf Text5.Text = Text5.Text & ipya Dim fbaq As String '地区 fbaq = Row.cells(6, 0).innerText & vbCrLf Text6.Text = Text6.Text & fbaq End If End Sub 以上代码只能在开始运行时在TEXT控件中加一次数据，如何能实现每10秒就获得一次数据的功能，代码如何写。

求长虹手机L128原程序求长虹手机L128原程序，谁有。发到[email protected]中，谢谢了。我是帮别人找的。

smp418的写频线 smp418的写频线，如何制作

如何用vb做一个有多层的图片小程序如何用vb做一个有多层的图片小程序

软件那里错了？

VB,做个机器人,主要工作是:控制鼠标 VB,做个机器人,主要工作是:控制鼠标在两个不同的程序之间进行复制和粘贴,如何编写代码？

1 下一页