写出txt文本格式直接复制到Excel就可用

djmy2018

移到文件尾 (文件号)
插入字节集 (文件号, 编码_Ansi到Utf8 (到文本 (取现行时间 ()) )
关闭文件 (文件号)

我写的只能是文本, 复制到Excel里就变成一行了


我想写入文本, 然后我复制到表格里, 他直接能是Excel格式,  谢谢大佬




补充内容 (2022-2-13 19:47):
我要写出很多行  比如  姓名 性别 年龄   下一行对应的  马晕 女 53

316840427

调试输出（“马晕” ＋ 字符 (9) ＋ “女” ＋ 字符 (9) ＋ “53” ＋ #换行符）

希望采纳

亮蓝色的风

保存成.CSV格式的 可以直接用excel打开

  

变量名	类 型	静态	数组	备 注
字节集	字节集
i	整数型

字节集 ＝ 到字节集 (“姓名,性别,年龄” ＋ #换行符 )
计次循环首 (10, i)
置随机数种子 ()
字节集 ＝ 字节集 ＋ 到字节集 (到文本 (取随机数 (1, 100)) ＋ “,” ＋ 到文本 (取随机数 (1, 100)) ＋ “,” ＋ 到文本 (取随机数 (1, 100)) ＋ #换行符 )
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\可用excel打开.csv”, 字节集)

.版本 2<br /> <br /> .局部变量 字节集, 字节集<br /> .局部变量 i, 整数型<br /> <br /> 字节集 ＝ 到字节集 (“姓名,性别,年龄” ＋ #换行符)<br /> <br /> .计次循环首 (10, i)<br />     置随机数种子 ()<br />     字节集 ＝ 字节集 ＋ 到字节集 (到文本 (取随机数 (1, 100)) ＋ “,” ＋ 到文本 (取随机数 (1, 100)) ＋ “,” ＋ 到文本 (取随机数 (1, 100)) ＋ #换行符)<br /> <br /> .计次循环尾 ()<br /> 写到文件 (取运行目录 () ＋ “\可用excel打开.csv”, 字节集)

316840427

316840427 发表于 2022-2-13 20:22
调试输出（“马晕” ＋ 字符 (9) ＋ “女” ＋ 字符 (9) ＋ “53” ＋ #换行符）

希望采纳 ...

置剪辑板文本（“马晕” ＋ 字符 (9) ＋ “女” ＋ 字符 (9) ＋ “53” ＋ #换行符）

djmy2018

亮蓝色的风 发表于 2022-2-13 20:13
保存成.CSV格式的 可以直接用excel打开
[e=0].版本 2

亲, 谢谢你写的代码, 但2楼的 字符(9)  真好用, 不好意思了, 谢谢