E4a取下n个上六n个值
事件 按钮1.被单击()
变量 每一行 为 文本型()
变量 I 为 整数型
变量 总行数 为 整数型
变量 后五前 为 整数型
编辑框2.内容 = ""
编辑框3.内容 = ""
每一行 = 分割文本(编辑框1.内容,"n")
总行数 = 取数组成员数(每一行)
后五前 = 总行数 - 5
'这个时候就先取出前面的
判断循环首 I < 取数组成员数(每一行)
如果 I > 后五前 - 1 则
编辑框2.加入文本(取文本左边(每一行(I),1) & "n")'取底部5个
结束 如果
I = I + 1
判断循环尾
I= 0
判断循环首 I < 取数组成员数(每一行)
如果 I < 7 则
编辑框3.加入文本(取文本左边(每一行(I),1) & "n")'取顶部7个
结束 如果
I = I + 1
判断循环尾
结束 事件
786 Views