• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[老狼] [老狼][源码分享]----简洁自定义一键连招----被迫营业的第七天 [复制链接]

1#
亮点:
1. 简洁、便捷、易懂
2. 一个列表框代替传统的两个类表框进行任务添加、删除、是否运行
效果一览:

代码一览:
  1. Event Form1.ListBox1.DblClick
  2. Var1 = Form1.ListBox1.List
  3. Var2=Split(Var1,"|")
  4. If Instr(Var2(Form1.ListBox1.ListIndex), "√") > 0 Then
  5. Form1.ListBox1.InsertItem Replace(Var2(Form1.ListBox1.ListIndex),"√ ","") , Form1.ListBox1.ListIndex
  6. Form1.ListBox1.RemoveItem Form1.ListBox1.ListIndex
  7. Else
  8. Form1.ListBox1.InsertItem "√ " & Var2(Form1.ListBox1.ListIndex), Form1.ListBox1.ListIndex
  9. Form1.ListBox1.RemoveItem Form1.ListBox1.ListIndex
  10. End If
  11. End Event
  12. Event Form1.Button1.Click
  13. Form1.ListBox1.AddItem Form1.InputBox1.Text
  14. End Event
  15. Event Form1.LoadOver
  16. Text = Plugin.File.ReadINI("Command", "Val", "C:\列表框记录.ini")
  17. Form1.ListBox1.List = Text
  18. Form1.OptionBox1.Value = 1
  19. End Event
  20. Event Form1.UnLoad
  21. Text = Form1.ListBox1.List
  22. Call Plugin.File.WriteINI("Command", "Val", Text, "C:\列表框记录.ini")
  23. End Event
  24. Event Form1.Button2.Click
  25. Form1.ListBox1.RemoveItem Form1.ListBox1.ListIndex
  26. End Event
  27. If Form1.OptionBox1.Value = 1 Then
  28. 模拟方式=0
  29. ElseIf Form1.OptionBox2.Value = 1 Then
  30. 模拟方式=1
  31. ElseIf Form1.OptionBox3.Value = 1 Then
  32. 模拟方式=2
  33. End If
  34. 总内容 = Form1.ListBox1.List&"|"
  35. TracePrint 总内容
  36. Do
  37. Key = WaitKey()
  38. //TracePrint chr(key)
  39. If instr(总内容, "√ "&chr(key) & ",") > 0 Then
  40. 触发内容 =Replace( split(split(总内容, chr(key) & ",")(1), "|")(0),"+",",")
  41. TracePrint 触发内容
  42. Call Lib.键盘.键盘按键组(触发内容, 模拟方式,20)
  43. End If
  44. Loop
复制代码
源码下载:
YJLZ.rar (, 下载次数:227)

最后编辑瑞祥幽冥狼 最后编辑于 2022-02-20 22:41:53
本主题由 超级版主 瑞祥幽冥狼 于 2023/4/5 13:50:06 执行 审核帖子 操作
收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
2#

白嫖成功

3#


4#

白嫖成功

噗噗个噗
5#

123456i

635787403
6#

大佬辛苦了

7#

...................................................

8#

辛苦了

9#

一直不知道from怎么玩

10#


11#

白嫖成功+1

喜欢学习
12#

白嫖成功+1

13#

6666谢谢分享,谢谢

14#

白嫖

15#

白嫖成功

16#

谢谢分享,学习了

17#

来看看

18#

支持一下。。。。

19#

dfjhkfdfdg

20#

啾咪

发新话题 回复该主题