mdsk.net
当前位置:首页 >> 按键精灵取文本中相似 >>

按键精灵取文本中相似

瞬间想出来了 不用谢我 请叫我红领巾======== 继续=1 a1="123" a = Lib.文件.读取指定行文本内容("e:\我.txt",继续) Rem w If a=a1 Then MessageBox "在第"&继续&"行有123" Else 继续=继续+1 a = Lib.文件.读取指定行文本内容("e:\我.txt",继续) Goto w End If======== 打个广告 寻找懂数学建模 帮写TNT公式 谢谢

按键精灵不是智能程序,不是你肚子里的蛔虫,如果一个字符串里面有两个需要判断的字符,那除非两个字符都是独一无二的,比如用英文ABCD来代表,不然的话是无法判断出你的12是要输入的代码还是特定字符串,除非限定一组的位数,比如一组字符最长为5的话,少于5用空格代表,那么以5为单位依次读取1-5,6-10的字符来判断输入,如果不限定位数就必须要用独一无二的字符,不然是不可能百分百检测出你哪个是代表,哪个是需要输入的.

字符串 = "等于是躺123456789" 元字符 = "[\u4e00-\u9fa5]" 返回值 = 正则表达式搜索(字符串,元字符) TracePrint 返回值 Function 正则表达式搜索(字符串,元字符) Dim regEx, Matches, Match set regEx = New RegExp regEx.[Global]

dim ta(4), tb(1)//申明两个数组来存放图片//假设图a类有5张图.图的名称为:图a-1,图a-2for i = 0 to ubound(ta) i1 = i+1 ta(i) = "attachment:\图a-" & i1 & ".bmp"//循环给数组a赋值 next for i = 0 to ubound(tb) i1 = i+1 tb(i) = "attachment:\图b

//下面这句是向目标文件("c:\config.txt")读出文本内容到变量(text)text = plugin.file.readfileex("c:\config.txt")msgbox "向目标文件读出文本内容为:"& textdim myarraymyarray = split(text, "|")if ubound(myarray)>=0 then i=0 for ubound(myarray) //下面这句是得到文本内容 msgbox "第 " & i+1 &" 行文本内容为:"& cstr(myarray(i)) i=i+1 nextend if这个是按键精灵自带的实例,应该是超完整了,哪里不懂追问

a = 1do saystring a a=a+1 loop

最简单的就是模拟按键,全选ctrl+a,然后退格,这样就全部删除了.用鼠标单击,好像也是全选在功能.

FindPic 0,0,1024,768,"你要找的图片.bmp",0.9,intX,intYIf intX > 0 and intY > 0 Then KeyPress "X", 1End If0.9为相似度,最大为1,就是完全一样,最小为0.1.这个自己调试

使用按键精灵的按键方法在记事本中横向逐个输入“abcdef” 输入显示如下:RunApp "notepad.exe"“运行文本” sr= "按键精灵真强大""定义输入的文字” 现在的问题是如何做到 逐字输入 SayString sr1

text = plugin.file.readfileex(文件路径)【把汉字替换为文件路径】while text > "" //循环,直至读完所有内容为止 qa = instr(text, "|") qs = len(text) 本行内容 = left(text, qa - 1)【一行一行读取,文本里只有账号就可以了,密码可以改成统一的】 text = right(text, qs - qa) 【执行,此处自己插入命令,你要的变量名为:本行内容】wend

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