1

为我的问题寻找可能的答案已经一周了,我正在制作一个可以获取网站内容的程序......我很难处理它。这是我的代码..

Dim xmlstring As String = "<TBODY><TR><TD>**20121123-034**</TD><TD><I class="ball">**3**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**4**</I>&nbsp;<I class="ball">**7**</I></TD><TD>**2012-11-23 11:40**</TD></TR> </TBODY>"

Dim sr 作为新 System.IO.StringReader(xmlstring)

将文档暗淡为新的 Xml.XmlDocument

    doc.LoadXml(xmlstring)

昏暗阅读器作为新的 Xml.XmlNodeReader(doc)

   While reader.Read

    Select Case reader.NodeType

       Case Xml.XmlNodeType.Element

    If reader.Name = "I" Then

    MessageBox.Show(reader.GetAttribute("ball"))

    RichTextBox2.Text = doc.InnerText

    Else

     MessageBox.Show("-__-")

    End If

    End Select
    End While

` 这是网站来源的一部分

<TBODY><TR><TD>**20121123-034**</TD><TD><I class="ball">**3**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**6**</I>&nbsp;<I class="ball">**4**</I>&nbsp;<I class="ball">**7**</I></TD><TD>**2012-11-23 11:40**</TD></TR>

粗体数字是我想在文本框或富文本框中输出的数字。

上面的代码正在工作,但它只适用于“DIM XMLSTRING”声明中的文本......我希望它来自一个实时网站......

感谢你们!

4

0 回答 0