mdsk.net
当前位置:首页 >> 按键精灵读取txt第一行 >>

按键精灵读取txt第一行

直接录制鼠标打开txt文件操作打开后录制鼠标一定选定录制ctrl+C录制运行calc录制+1重新复制回txt并保存……

下面是程序,你来在界面添加自一个输入框就行了百 Y = 1 Event Form1.InputBox1.Change Form1.InputBox1.Text = Left(Form1.InputBox1.Text,5) End Event Call Plugin.Office.OpenXls("C:\Users\huangwei\Desktop\新建 Microsoft Excel 工作表度.

按键自带读文件插件有缺陷,不知道你文本里面的内容是否有“|”这个字符,如果有,就不能读了,只能用其他插件,如果没有,你可以这样做://下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text)Text = Plugin.File.ReadFileEx("C:\Config.txt")MyArray = Split(Text, "|")If UBound(MyArray)>=0 Then For i = 0 To UBound(MyArray) //下面这句是得到文本内容 Msgbox "第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i)) NextEnd If

For i=1 to 99999 A = Lib.文件.读取指定行文本内容("C:\Log.txt", i) SayString A TracePrint A Next 实际应用可以自行修改读取的文件路径.

你的问题非常模糊 下面提供一些例子代码你自己研究看看text = plugin.file.readfileex("c:\log.txt")//获取c:\log.txt里面的所有内容,返回给textmessagebox texttext = lib.文件.读取指定行文本内容("c:\log.txt", 1)//获取c:\log.txt里面的第一行的内容

代码如下 自己研究试试文本路径="C:\成功账号.txt"Text = Plugin.File.ReadFileEx(文本路径)Text=Split(Text,"|")数量=UBound(Text)-1行数=1For 数量 内容= Lib.文件.读取指定行文本内容(文本路径,行数) 内容1= Lib.文件.读取指定行文本内容(文本路径,行数+1) Call Lib.文件.替换指定行文本内容(文本路径,内容1,行数) Call Lib.文件.删除指定行文本内容(文本路径,行数+1) MessageBox "第一行内容是"&内容 MessageBox "第二行内容是"&内容1Next

&这是连接符 a=123b=abcc=a&bTracePrint c //调试输出就是123abc

文件路径 = "d:\新建文本文档.txt"Text = Plugin.File.ReadFileEx(文件路径)TracePrint Text分割内容 = Split(Text, "|")For i = 0 To UBound(分割内容) - 1 TracePrint "第 " & i & " 行, 内容为:" & 分割内容(i) SayString 分割内容(i) & vbcr Next//设置好要读取的文件路径,打开一个空文档,在可输入状态(热键F10)运行按键精灵

文档路径 = "C:\demo.txt"'设置文档路径Text = Plugin.File.ReadFileEx(文档路径)str = Split(Text, "|")MessageBox "关闭本弹窗后,鼠标移动要输出的窗口.然后按任意键确定"key = WaitKey()Hwnd = Plugin.Window.MousePoint()

SetSimMode 2 For i = 1 To UBound(Split(Plugin.File.ReadFileEx("C:\文本.txt"), "|")) A = lib.文件.读取指定行文本内容("C:\文本.txt", i) Call Plugin.Bkgnd.SendString(70090, A) Call Plugin.Bkgnd.KeyPress(70090, 13) Next 窗口句柄是会变化的,我也不清楚你的那个窗口句柄是否是恒定的,但是我不知道你那个窗口的标题和类别名,所以我也不能直接准确的获得窗口句柄,你自行修改窗口句柄吧,还有文件路径.

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