1a=split(text1.text,",")for i=0 to ubound(a)print(a(i))next2a=split(text1.text,",")for i=0 to ubound(a) step 2print (a(i))print ","print(a(i+1))next第2个要注意判断下标越界问题
先将text1中的文本分裂存入数组,然后就可以按照需要写入文件