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

按键精灵 文档

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))...

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

由于换行符与账号密码分隔符一样,都是"|",所以这里我把":"当做账号密码分隔符。 代码: 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看看

“”部分用ascii码代替“是chr34 SayString "band"&Chr(34)&"1"& Chr(34) //band“1”

路径 = "C:\Documents and Settings\Administrator\桌面\" 文件名 = "A-F-" //创建一个文件夹 Call Plugin.File.CreateFolder(路径&文件名) //这是直接创建一个文件夹,名称可以在启动脚本前设定好.

最简单的方法是你先录制一遍,然后执行就ok了。

a = "123,456,www,我我我,你你你"a = Split(a, ",")Fori=0 To UBound(a)TracePrint a(i)SayString a(i)KeyPress "Enter", 1Next 这个是简化的 示范你得自己看得懂自己去修改 分隔符 和导入文本路径读取

Text1 = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档1.txt")//文档位置你自己改 Text2 = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档2.txt") dim MyArray MyArray1 = Split(Text1, "|") MyArray2 = Split(Text2, "|")...

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