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

按键精灵 文档

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

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

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

Text = Plugin.File.ReadFileEx("E:\网游\梦幻\聊天记录.txt")TracePrint "向目标文件读出文本内容为:"& TextDim MyArrayMyArray = Split(Text, "碑石")If UBound(MyArray)>=0 Then text1 = Cstr(MyArray(1)) TracePrint text1 Dim MyArray1 My...

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

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

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

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

1 2 3 4 5 6 7 8 9 10 11 12 13 //下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text) Text = Plugin.File.ReadFileEx("C:\Config.txt") Msgbox "向目标文件读出文本内容为:"& Text dim MyArray MyArray = Split(Text, "|") If UB...

RunApp "C:\Users\Administrator\Desktop\我是文件名.txt"'打开文件命令Delay 200While Hwnd < 1Hwnd = Plugin.Window.Find("Notepad", "我是文件名.txt - 记事本")'这边的"我是文件名"就是你的记事本文件名WendTracePrint HwndCall Plugin.Wind...

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