热心网友
回答时间:2024-10-11 12:31
//输出数字和字母----------------------------------------------
y=1234
RunApp "notepad.exe"
Do
Delay 1000
Hwnd = Plugin.Window.Find(0, "无标题 - 记事本")
Loop Until hwnd>0
z = cstr(y)
For f = 1 To len(z)
字符 = mid(z, f, 1)
KeyDown 字符, 1
Delay 500
KeyUp 字符, 1
Delay 200
Next
收起
热心网友
回答时间:2024-10-11 12:31
在D盘根目录下写111.txt文件:
Call Plugin.File.WriteFileEx("d:\111.txt","1234567890123")
Call Plugin.File.WriteFileEx("d:\111.txt","2345678901234")
收起