不知道是不是你要的效果，附件已附上
.版本 2
.子程序 _按钮1_被单击
.局部变量 TEXT, 文本型
.局部变量 返回文本, 文本型, , "0"
通用对话框1.打开 ()
TEXT ＝ 到文本 (读入文件 (通用对话框1.文件名))
返回文本 ＝ 分割文本 (TEXT, #换行符, )
编辑框1.内容 ＝ 返回文本 [1]
TEXT ＝ 子文本替换 (TEXT, 编辑框1.内容, “”, 1, 1, 假)
写到文件 (通用对话框1.文件名, 到字节集 (TEXT))
读入TXT文本中第一行的内容到编辑框1，然后删除TXT第一行内容。依次循环读入，即可
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024