楼上那位的有错,对于多行的文字来说就乱了,正确的如下
Plugin Text = File.ReadFileEx("D:\123.txt")
MyArray = Split(Text, "|")
If UBound(MyArray)>=0
i=0
For UBound(MyArray)
//下面这句是将得到的文本行合并还原
x=x&Cstr(MyArray(i))&vbcrlf
i=i+1
EndFor
EndIf
//复制到剪贴板
Plugin Sys.SetCLB(x)
msgbox x
————————————————————————————
楼主,你很贪心哟,一个15分的问题还改来补充,正好我看到,顺便答复你吧,你要的连续打开文件,正好我昨天回答了别人的一个同类问题,你自己去看看
http://zhidao.baidu.com/question/146040014.html?si=4
细节因为不清楚你们的要求,无法写出你要的代码,你自己也该学学,总不能一直都是依靠别人帮你写吧,那对你自己的提高没好处哟
至于你说的打开文件有错,是不是你自己的文件路径不对,检查一下,我这里测试通过的
哈哈这个让我回答你吧!我也是这几天刚好学习到的!希望对你有用
RunApp "D:\1.txt" \\用这个命令可以打开文本
自动读取是下面这句
//下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text)
Plugin Text = File.ReadFileEx("D:\1.txt")
//然后你可以将Text赋值到剪贴版中(这是我理解的)
Plugin Sys.SetCLB(Text)
这是我这几天在找出来的结果,试过了OK,不过有个问题,就是每一行结束会多有一个“|”,我不知道怎么解决