嘉盛 543724 4436796766 2 11
嘉盛 543713 7829099445 1 2.5
嘉盛 543688 7829460284 1 3.4
嘉盛 543698 7829596143 1 4
有这么一组数据。每列之间是用 字符(9) 分开。
我想把它按列分割开来。分成五列。将五列依次写入,编辑框1到5。5个编辑框里。
请问怎么实现。谢谢
处理成这样效果。
第1个回答 2013-07-12
.版本 2
.子程序 分割文本1, 文本型, 公开
.参数 文本, 文本型
.参数 分割字符, 文本型
.参数 返回第几项, 整数型
.局部变量 str, 文本型, , "0"
.局部变量 j
.局部变量 i
str = 分割文本 (文本, 分割字符, )
.计次循环首 (取数组成员数 (str), i)
.如果真 (删首尾空 (str [i]) ≠ “ ”)
j = j + 1
.如果真 (j = 返回第几项)
返回 (删首尾空 (str [i]))
.如果真结束
.如果真结束
.计次循环尾 ()
返回 (“”)
.子程序 分割文本1, 文本型, 公开
.参数 文本, 文本型
.参数 分割字符, 文本型
.参数 返回第几项, 整数型
.局部变量 str, 文本型, , "0"
.局部变量 j
.局部变量 i
str = 分割文本 (文本, 分割字符, )
.计次循环首 (取数组成员数 (str), i)
.如果真 (删首尾空 (str [i]) ≠ “ ”)
j = j + 1
.如果真 (j = 返回第几项)
返回 (删首尾空 (str [i]))
.如果真结束
.如果真结束
.计次循环尾 ()
返回 (“”)
第2个回答 2013-07-09
打开文本
读入一行
分割文本
再读,再分割. 或直接来个循环也行追问 追问
读入一行
分割文本
再读,再分割. 或直接来个循环也行追问
给个例程啊。。我知道用循环。问题是不会用啊
追答你看这是不是你要的结果
我的意思是要把五列写入 下面五个 编辑框中。(上图)
而且。行数不一定是5行。行数不确定的。
你看一下吧, 已经达到你要的效果了. 你后面就是加无限行, 也一样
兄弟谢了。可是还是有问题啊。
我这个行数并不固定。。。。有可能有40行。。。但然最大行数不会超过50行的。。。。。也有可能只有1行。。你这个我复制7汗。直接报错啊
有这么一组数据。每列之间是用 字符(9) 分开。
问题出在这里, 二次分割,我用了空格, 你这个是9 把空格换成9 就行了.
如果,你二次分割是空格的话, 并且空格数量不同, 那就要先处理文本后, 再分割,类似查找两个空格替换一个空格. 的处理, 然后才能处理分割问题.
不懂--、能写下源码吗。谢谢了。。
追答把你的整个数据给我
本回答被提问者采纳