按键精灵有生成13位时间戳的代码或插件吗，求大神指点

Posted 2023-04-02

参考技术A UserVar ShuChuFangShi = 1 ;获取到时间之后的输出方式。
1是弹对话框，适合平时看时间；
2是文本输出，适合网游里使用;
Dim Y,Mon,D,W,h,m,s,SJ
//先声明变量
Y=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)
//利用VBS函数获得当前系统的年,月,日,星期 并各自保存到变量中
h=Hour(time):m=Minute(time):s=Second(time)
//利用VBS函数获得当前系统的时,分,秒 并各自保存到变量中
SJ=Y ;年; Mon ;月; D ;号; W ; ; h ;点; m ;分; s ;秒;
//把得到的年,月,日,星期,时,分,秒连接起来 并保存到SJ变量中
If ShuChuFangShi=1 Then
//最后弹出个窗口 显示当前的系统时间（变量SJ）
MessageBox SJ
End If
If ShuChuFangShi=2 Then
//最后弹出个窗口 显示当前的系统时间（变量SJ）
MessageBox SJ
End If本回答被提问者采纳

按键精灵如何使用大漠插件绑定数个窗口

有哪位大神能给哥实例吗？
按键精灵使用大漠插件在数个窗口实现后台鼠标点击
麻烦给个3-4个窗口点击的实例！！
我是小白！大神们勿喷~~~~

必须使用多线程，楼上说的不正确，如果在绑定后再次进行绑定，之前的窗口就会失效

下面是我的代码：

Dim hwnd(5) '数组，这里假设存放着6个窗口的句柄
DimEnv nowhwnd '多线程传递变量

For i = 0 To 5
    nowhwnd = hwnd(i)
    BeginThread main
    Delay 3000
Next

Sub main
    thehwnd = nowhwnd

    dm_ret = dm.BindWindow(thehwnd, "normal", "dx", "normal", 0)
    '这里写你的点击代码
End Sub

希望我的回答对你有帮助

^o^

参考技术A 如果你会写多线程就好办，主要是句柄和卡机问题，大漠绑定时会占用电脑资源，同时绑定太多会造成卡机或者软件崩溃，所以一般都是一个一个绑定比较保险，如：显示1获取最前窗口句柄绑定1，等1运行正常后，再显示2获取最前绑定2、2稳定再3.。。。。。