一行字符串，怎么读取除空格外的字符放在数组里

小丫头amy · 发表于 2012-12-14 10:09:56

如图所示，我要把选中的行中，把flight,from等的值单独取出来。要怎么办啊？我要split（分隔字符,""）好像不行

泰然 · 发表于 2012-12-14 10:21:58

你有没有发现一个特点，无论什么查询结果，字串总长和每个字段的长度是固定的？mid就能解决。

小丫头amy · 发表于 2012-12-14 10:30:37

回复 2# 泰然

这样子的话要一个个读取有点麻烦，有么有更快点的方法呢？

nimcok · 发表于 2012-12-14 14:41:58

split应该没有问题的，你需要先弄清楚你的分隔符是什么？

黑羽祭 · 发表于 2012-12-17 11:37:27

回复 1# 小丫头amy

你试试这段脚本，我也是根据Flight写的

Dim arrList
arrList = Window("off").Dialog("Flights Table").WinList("航班").GetROProperty("all items")
arrList = split(arrList,chr(10),-1,1)
Dim i,j
For i = 0 to ubound(arrList)
arrList(i) = split(arrList(i)," ",-1,1)
For j = 0 to ubound(arrList(i))
print "arrList(" & i & ")(" & j & ") = " & arrList(i)(j)
Next
Next

复制代码

小丫头amy · 发表于 2012-12-17 14:09:10

回复 5# 黑羽祭

学习了，我原先直接用split怎么会不行。

黑羽祭 · 发表于 2012-12-17 14:14:33

本帖最后由黑羽祭于 2012-12-17 14:18 编辑

回复 6# 小丫头amy

你参数没写完整http://www.51testing.com/index.php?uid-307440-action-viewspace-itemid-828132

bertha2124 · 发表于 2012-12-18 14:15:00

分隔符號應該是「空白」，但妳好像寫成""這樣，應該是splite(A, " ")這樣~

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] 一行字符串，怎么读取除空格外的字符放在数组里