求大神解答如何用VB获取某个网页的<label><label>和<td><td>标签中的值,放在文本框中

求大神解答如何用VB获取某个网页的<label><label>和<td><td>标签中的值,放在文本框中,第1张

用正则匹配即可

Option Explicit

Function GetSource$(Source$)                                                    '//正则匹配<td></td>

    Dim reg As Object

    Dim matchs As Object, match As Object

    Dim s As String, i As Integer

    Set reg = CreateObject("vbscriptregExp")

    regGlobal = True

    regIgnoreCase = True

    regMultiLine = True

    regPattern = "<label>()<\/label>"

    Set matchs = regExecute(Source)

    For Each match In matchs

        i = i + 1

        s = s & matchSubMatches(0) + vbCrLf

    Next

    GetSource = s

End Function

Function div$(Source$)                                                          '//正则匹配  <div></div>

    Dim reg As Object

    Dim matchs As Object, match As Object

    Dim s As String, i As Integer

    Set reg = CreateObject("vbscriptregExp")

    regGlobal = True

    regIgnoreCase = True

    regMultiLine = True

    regPattern = "<div>()<\/div>"

    Set matchs = regExecute(Source)

    For Each match In matchs

        i = i + 1

        s = s & matchSubMatches(0) + vbCrLf

    Next

    div = s

End Function

Private Sub Command1_Click()

    MsgBox "div标签获取" + vbCrLf + GetSource$(Text1)

    MsgBox "label标签获取" + vbCrLf + GetSource$(Text1)

End Sub

在a标签上写个class,用jq写的

$("a标签的class")click(function(){

var text = $(this)parent("td")siblings("td")text();

alert(text)

})

自己加就可以了

如一个表格:

<table><tr><td></td></tr><table>

自己加个tbody 如:

<table><tbody><tr><td></td></tr></tbody><table>

<script type="text/javascript">

function js() {

var item = documentgetElementById("tb"); //获取id为tb的元素(table)

var tbody = itemgetElementsByTagName("tbody")[0]; //获取表格的第一个tbody元素

var trs = tbodygetElementsByTagName("tr"); //获取tbody元素下的所有tr元素

for (var i = 0; i < trslength; i++) { //循环tr元素

if (i % 2 == 0) { //取模

trs[i]stylebackgroundColor = "#888"; //改变符合条件的tr元素的背景色

}

} //没有实现

}

</script>

错了一点

以上就是关于求大神解答如何用VB获取某个网页的<label></label>和<td></td>标签中的值,放在文本框中全部的内容,包括:求大神解答如何用VB获取某个网页的<label></label>和<td></td>标签中的值,放在文本框中、js获取table当前tr行第二列td的值、table 下面的tbody是怎么弄出来的等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://www.54852.com/web/10135134.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-05
下一篇2023-05-05

发表评论

登录后才能评论

评论列表(0条)

    保存