秋叶操作快捷精灵解答流程

2021-03-09 17:24:29发表 作者:网友供稿

win7纯净版系统是好多小伙伴使用最多的电脑系统,不过有诸多使用者在操作过程中或许会面临处理快捷精灵的时候。大多数客户在计算机技术方面还是新手,有关快捷精灵的情况,不懂如何决断。不少用户都来咨询小编快捷精灵需要怎么处理?其实我们只要遵从以下规律 1:先给小案例搭个界面,一个按钮可以启动脚本,中间我们的快捷键f2来进行暂停和再启动,注意要在界面上加一个热键控件,控件设置成不可见即可. 2:让我们先来写下按钮的click事件,点击按钮后我们开启一个子线程,子线程定义一个死循环,每半秒钟去更新下界面上的label,一直数数. 就可以处理了。紧接着就和微软技术指导一起研习关于快捷精灵详尽的解决方法:

1:先给小案例搭个界面,一个按钮可以启动脚本,中间我们的快捷键f2来进行暂停和再启动,注意要在界面上加一个热键控件,控件设置成不可见即可.

2:让我们先来写下按钮的click事件,点击按钮后我们开启一个子线程,子线程定义一个死循环,每半秒钟去更新下界面上的label,一直数数.

3:ok,效果还不错,接下去我们就要用热键F2事件去暂停这个计数器

4:双击热键控件,编写热键事件为暂停我们的子线程,注意在界面载入事件中设置一下热键键值,并将其注册

5:现在启动计数之后按f2,计数就会暂停了,让我们再稍微完善一下逻辑

6:加个变量来记录线程状态,热键事件为判断线程状态,未暂停则暂停,暂停了则继续

7:修改一个一开始的小bug,多线程编程时,开启线程一定要加保护,不然疯狂点开始按钮,线程就要爆炸了

8:还有强迫症的善后工作,在UnLoad事件中关闭子线程,注销热键.

9:id1 = 0

Event Form1.Button1.Click

If id1 = 0 Then 

id1 = BeginThread(thread1)

End If

End Event

Sub thread1

x = 1

Do

Delay 500

Form1.Label1.Caption = x

x = x + 1

Loop

End Sub

Event Form1.Load

//设置停止线程的热键为:F2 

    Form1.Hotkey1.Virtualkey = 113     

    //注册热键;True为注册,False为销毁。   

    Form1.Hotkey1.Register True

End Event

//线程暂停状态,flase为没暂停,true为暂停了

thread_pause_status = False

Event Form1.Hotkey1.Hotkey

//如果线程暂停

If thread_pause Then 

//重启线程,修改标记

ContinueThread id1

thread_pause = False

//如果线程没暂停

Else 

//暂停线程,修改标记

PauseThread id1

thread_pause = True

End If

End Event

Event Form1.UnLoad

//终止线程

StopThread id1

//销毁热键; 

    Form1.Hotkey1.Register False

End Event

上面给大家介绍的就是关于快捷精灵,还有不会的朋友可以按照上面的步骤来解决,小编就讲解到这里了,我们下期再会!

0
网友评论
  • 😊
  • 😂
  • ❤
  • 😭
  • 😍
  • 😘
  • 🙄
  • 💀
  • 😫
  • 🤔
没有符合条件的内容