怎么弄写入文本时自动换行？ _ 常见问题

查看: 8529\|回复: 0	[技术类问题] 怎么弄写入文本时自动换行？ [复制链接]

兄弟工程师01

组别版主
UID211464
帖子21164
精华13
鲜花258 朵
铜币47817 个
银币60 个
在线时间263800
注册时间2008-12-23

1^#

字体大小: t T

发表于 2011-08-17 09:52 | |只看楼主

问题：
1|2|3|4|5|
怎么写入文本弄成换行的
1
2
3
4
5

回答：

Text = "1|2|3|4|5|"
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//下面这句是向目标文件("C:\Config.txt")写入文本内容
Call Plugin.File.WriteFileEx("C:\Config.txt", Cstr(MyArray(i)))
i=i+1
Next
End If
RubApp "C:\Config.txt" //打开查看

【按键精灵手机版】按键精灵安卓版v3.0发布啦~体验送现金红包哦！！

【按键精灵2014.03.16412版】这是有史以来最稳定的版本，不信你用一个？

.

回顶部

上一主题| 下一主题

[技术类问题] 怎么弄写入文本时自动换行？ [复制链接]