Question

VB字符串拆分问题

要把“8a8e92b33068fd9f0130697fae280001{_t}2{_t}测试数据{_t}20110607174713{_r}”
这样一段字符串， 根据{_t} 拆分成string()

Dim ch2 As Char() = New Char() {"{"c, "_"c, "t"c, "}"c}
row = sTemp.Split(ch2)
这样写不行。 谁能帮帮

Answer 1

dim str() as string
str=split ("8a8e92b33068fd9f0130697fae280001{_t}2{_t}测试数据{_t}20110607174713{_r}","{_t}")
'然后str(1)就是"8a8e92b33068fd9f0130697fae280001"
'str(2)就是"2"
'str(3)就是"测试数据"
'以此类推

Answer 2

dim Row_l
Result="8a8e92b33068fd9f0130697fae280001{_t}2{_t}测试数据{_t}20110607174713{_r}"
Row_l = Split(Result, "{_t}")
For i = 0 To UBound(Row_l)
msgbox row_l(i)
next