如图:
点击按纽,读入一个文件后
如果在循环判断或判断循环事件里,依次读入分割文本到编辑框2和编辑框3中。谢谢。
例:
判断循环首(编辑框1.总行数<>0)
读取一行(编辑框1的内容)到编辑框2
读取第二行(编辑框1的内容)到编辑框3
执行子程序()
判断循环尾()
一个循环后,第二次循环依次读取分割文本的第三部份,第四部份。
谢谢指教。
谢谢你啊,帮我看下,按你的方法,只能用信息框处理结果,如果取消掉信息框,就会提示什么下标错误。
还有,不能连续取啊。
第一次循环取第一和第二数字,第二次循环取的不是第三和第四,而是第二和第三数字。这个又该如何处理。
我是想要在取得第一和第二数字后,执行一段子程序,子程序执行完,再来第二次循环,
能不能教下,非常感谢。
.版本 2
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 ())
编辑框1.内容 = 到文本 (读入文件 (通用对话框1.文件名))
开始赋值 ()
.如果真结束
.子程序 开始赋值
.局部变量 Data, 文本型, , "0"
.局部变量 I, 整数型
Data = 分割文本 (编辑框1.内容, “,”, )
.如果真 (取数组成员数 (Data) > 0)
.计次循环首 (取数组成员数 (Data), I)
.如果 (取数组成员数 (Data) = I)
编辑框2.内容 = “”
编辑框3.内容 = Data [I]
.否则
编辑框2.内容 = Data [I]
编辑框3.内容 = Data [I + 1]
.如果结束
信息框 (编辑框3.内容, 0, 编辑框2.内容)
.计次循环尾 ()
.如果真结束
我定义的分割符是 逗号 如果是一行进行分割的话 可以使用 #换行符 来分割
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 ())
编辑框1.内容 = 到文本 (读入文件 (通用对话框1.文件名))
开始赋值 ()
.如果真结束
.子程序 开始赋值
.局部变量 Data, 文本型, , "0"
.局部变量 I, 整数型
Data = 分割文本 (编辑框1.内容, “,”, )
.如果真 (取数组成员数 (Data) > 0)
.计次循环首 (取数组成员数 (Data), I)
.如果 (取数组成员数 (Data) = I)
编辑框2.内容 = “”
编辑框3.内容 = Data [I]
.否则
编辑框2.内容 = Data [I]
编辑框3.内容 = Data [I + 1]
.如果结束
信息框 (编辑框3.内容, 0, 编辑框2.内容)
.计次循环尾 ()
.如果真结束
我定义的分割符是 逗号 如果是一行进行分割的话 可以使用 #换行符 来分割
温馨提示:答案为网友推荐,仅供参考