积极答复者
分割字符串,求教高手,谢谢!!!

问题
-
<tr class="t_tr1"><td>10108</td><td>2010-09-16</td><td class="t_cfont2">04</td><td class="t_cfont2">23</td><td class="t_cfont2">24</td><td class="t_cfont2">20</td><td class="t_cfont2">08</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">04</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">20</td><td class="t_tdb1 t_cfont1">23</td><td class="t_tdb1 t_cfont1">24</td><td class="t_cfont4">07</td></tr><tr class="t_tr1"><td>10107</td><td>2010-09-14</td><td class="t_cfont2">08</td><td class="t_cfont2">15</td><td class="t_cfont2">22</td><td class="t_cfont2">12</td><td class="t_cfont2">17</td><td class="t_cfont2">33</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">12</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">17</td><td class="t_tdb1 t_cfont1">22</td><td class="t_tdb1 t_cfont1">33</td><td class="t_cfont4">16</td></tr><tr class="t_tr1"><td>10106</td><td>2010-09-12</td><td class="t_cfont2">26</td><td class="t_cfont2">15</td><td class="t_cfont2">29</td><td class="t_cfont2">08</td><td class="t_cfont2">06</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">06</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">26</td><td class="t_tdb1 t_cfont1">29</td><td class="t_cfont4">16</td></tr>
Dim atemp() As String = a.Split(New Char() {"</td></tr>"})‘a为上面的字符串
Dim i As Short
For i = 0 To UBound(atemp)
Debug.Print(atemp(i))
Next我想分割后的为:3段(用上面的代码我没做到,求助各位,谢谢!!!)
<tr class="t_tr1"><td>10108</td><td>2010-09-16</td><td class="t_cfont2">04</td><td class="t_cfont2">23</td><td class="t_cfont2">24</td><td class="t_cfont2">20</td><td class="t_cfont2">08</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">04</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">20</td><td class="t_tdb1 t_cfont1">23</td><td class="t_tdb1 t_cfont1">24</td><td class="t_cfont4">07</td></tr>
<tr class="t_tr1"><td>10107</td><td>2010-09-14</td><td class="t_cfont2">08</td><td class="t_cfont2">15</td><td class="t_cfont2">22</td><td class="t_cfont2">12</td><td class="t_cfont2">17</td><td class="t_cfont2">33</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">12</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">17</td><td class="t_tdb1 t_cfont1">22</td><td class="t_tdb1 t_cfont1">33</td><td class="t_cfont4">16</td></tr>
<tr class="t_tr1"><td>10106</td><td>2010-09-12</td><td class="t_cfont2">26</td><td class="t_cfont2">15</td><td class="t_cfont2">29</td><td class="t_cfont2">08</td><td class="t_cfont2">06</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">06</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">26</td><td class="t_tdb1 t_cfont1">29</td><td class="t_cfont4">16</td></tr>
答案
-
您可以用用dtataset把整个html读取到table
成为 Microsoft V Dash了。。。 欢迎各位前辈同事在OCS加我- 已建议为答案 韦恩卑鄙 waywaModerator 2010年9月20日 10:13
- 已标记为答案 ThankfulHeartModerator 2010年9月24日 6:37
-
你也可以使用LINQtoXML的方式提取tr的数据:
var result = from e in XDocument.Parse(你的HTML字符串).Descades("tr")
select e.Value;
- 已建议为答案 韦恩卑鄙 waywaModerator 2010年9月20日 10:13
- 已标记为答案 ThankfulHeartModerator 2010年9月24日 6:37
全部回复
-
下面是一个网页上的表格,我想把表内数据提取出来,求教高手帮助,谢谢!!!
<tr class="t_tr1"><td>10108</td><td>2010-09-16</td><td class="t_cfont2">04</td><td class="t_cfont2">23</td><td class="t_cfont2">24</td><td class="t_cfont2">20</td><td class="t_cfont2">08</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">04</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">20</td><td class="t_tdb1 t_cfont1">23</td><td class="t_tdb1 t_cfont1">24</td><td class="t_cfont4">07</td></tr><tr class="t_tr1"><td>10107</td><td>2010-09-14</td><td class="t_cfont2">08</td><td class="t_cfont2">15</td><td class="t_cfont2">22</td><td class="t_cfont2">12</td><td class="t_cfont2">17</td><td class="t_cfont2">33</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">12</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">17</td><td class="t_tdb1 t_cfont1">22</td><td class="t_tdb1 t_cfont1">33</td><td class="t_cfont4">16</td></tr><tr class="t_tr1"><td>10106</td><td>2010-09-12</td><td class="t_cfont2">26</td><td class="t_cfont2">15</td><td class="t_cfont2">29</td><td class="t_cfont2">08</td><td class="t_cfont2">06</td><td class="t_cfont2">02</td><td class="t_tdb1 t_cfont1">02</td><td class="t_tdb1 t_cfont1">06</td><td class="t_tdb1 t_cfont1">08</td><td class="t_tdb1 t_cfont1">15</td><td class="t_tdb1 t_cfont1">26</td><td class="t_tdb1 t_cfont1">29</td><td class="t_cfont4">16</td></tr>
- 已合并 Sheng Jiang 蒋晟Moderator 2010年9月19日 0:40
-
您可以用用dtataset把整个html读取到table
成为 Microsoft V Dash了。。。 欢迎各位前辈同事在OCS加我- 已建议为答案 韦恩卑鄙 waywaModerator 2010年9月20日 10:13
- 已标记为答案 ThankfulHeartModerator 2010年9月24日 6:37
-
你也可以使用LINQtoXML的方式提取tr的数据:
var result = from e in XDocument.Parse(你的HTML字符串).Descades("tr")
select e.Value;
- 已建议为答案 韦恩卑鄙 waywaModerator 2010年9月20日 10:13
- 已标记为答案 ThankfulHeartModerator 2010年9月24日 6:37