mwbr.net
当前位置:首页 >> 按键精灵 文档 >>

按键精灵 文档

由于换行符与账号密码分隔符一样,都是"|",所以这里我把":"当做账号密码分隔符。 代码: Dim Path, Text, i, zm Path="C:\Documents and Settings\Administrator\桌面\新建 文本文档.txt" '填入文件路径 Text = Plugin.File.ReadFileEx(Path) '...

你的问题非常模糊 下面提供一些例子代码你自己研究看看 Text = Plugin.File.ReadFileEx("C:\Log.txt") //获取C:\Log.TXT里面的所有内容,返回给text MessageBox text Text = Lib.文件.读取指定行文本内容("C:\Log.txt", 1) //获取C:\Log.TXT里...

A1=5+5 Call Plugin.File.WriteFileEx("C:\Log.txt", a1) Delay 1000 RunApp "C:\Log.txt"//打开TXT看看

帮你写好啦,直接copy上去运行即可,表太谢我~ ======================================= //读取txt word = Plugin.File.ReadFileEx("C:\1.txt") //分割为行 Dim hang hang = split(hang, "|") //循环打出每一行 For i = 0 To UBound(hang) SayS...

I=0 Test=Plugin.File.ReadFileEx("C:\Users\zen\Desktop\文章.txt") txtArray = Split(Test, "|") While Len(txtArray(I))>=1 RE=txtArray(I) SayString RE I=I+1 KeyPress "Enter", 1 Wend 输出源文件“文章”中每行的内容,然后按回车,直到遇...

OpenFile 打开文件 该命令会在后台打开一个文件,文件后缀决定了打开的文件类型,路径需要全路径。如果该文件不存在,该命令会自动在该路径下新建一个该名字的文件并打开。 可以设定返回变量,如返回值为-1表示打开文件失败,否则返回文件的句柄...

Text1 = Plugin.File.ReadFileEx("d:\素材1.txt") Text2= Plugin.File.ReadFileEx("d:\素材2.txt") Text3= Plugin.File.ReadFileEx("d:\素材3.txt") Text4 = Plugin.File.ReadFileEx("d:\素材4.txt") MyArray1 = Split(Text1, "|") MyArray2= Sp...

如果变量不多,建议直接记录在变量dim再写入txt dim a For 3 a=a&222 & "." next Call Plugin.File.WriteFileEx("D:\1.txt",a)

这个是基础好吧!!!!!!

Text = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档.txt")//文档位置你自己改 dim MyArray MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then i=0 For UBound(MyArray) //下面这句是得到文本内容 SayString Cstr(MyArray(i))...

网站首页 | 网站地图
All rights reserved Powered by www.mwbr.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com