安卓定时器代码(冥想定时器安卓)

金猪脚本(原飞猪脚本)以按钮向导教学为主,涉及UiBot、Python、Lua等脚本语言。教学包括全自动办公脚本、游戏助手脚本、引流脚本、网页脚本、Android脚本、IOS脚本、注册脚本

本文最后更新时间:  2023-05-03 03:05:53

金猪脚本(原飞猪脚本)以按钮向导教学为主,涉及UiBot、Python、Lua等脚本语言。教学包括全自动办公脚本、游戏助手脚本、引流脚本、网页脚本、Android脚本、IOS脚本、注册脚本、喜欢脚本、阅读脚本、网赚脚本等所有领域。想做剧本,想学习钥匙精灵的朋友可以添加钥匙精灵学习交流群:554127455学习路上你不再孤独,金猪剧本与你一起成长。

脚本功能很好用,但是界面乱七八糟的让人尿尿。

.......总是让人觉得害怕?吓唬小孩子有什么意义?

脚本的接口可以说是脚本的门面。只有好看才能吸引更多的怪异~只要我们懂得使用控件,尽情发挥自己的无限创意,就一定能让QUI界面更加风骚~

滑动界面

骚气值:五星,很骚气。

功能:点击鼠标滑动界面,切换到其他页面。

效果演示:

主控标签、定时器、标签、单选按钮、热键

大意:1。画一个热键控件,热键设置为左键弹出。

2使用选项卡控件,创建五个选项页面。

画五个单选按钮。五个单选按钮。

4画一个定时器和一个标签(标签在所有控件之上,大小要挡住整个脚本界面。使标签透明。)

5在选项卡点击事件中,启动计时器。

在timer事件中,设置当鼠标滑动时,选项页变成另一页。

7在热键热键事件中关闭计时器

Code: Dim x1,x2,y1,y2,options,option记录event form1 . load form 1 . hot key 1 . register trueform 1 . timer 1 . enabled = false//默认定时器启动,所以先停form 1。Timer1.Interval = 120 //设置定时器周期的间隔时间(单位:毫秒)option =Form1。TabControl1.TabCall单选框display()end event form1 . label 1 . clickgetcursorpos x1,Y2选项record = form 1 . tab control 1 . tab form 1 . timer 1 . enabled = false//计时器form 1 .定时器1。enabled =真结束eventform1。热键1。热键表单1。定时器1。enabled = false结束eventform1。定时器1。timer dimdgetcursorposx2,Y2D =(x2 –x1)\ 70+如果d >: =0且d & lt= 4 theform 1 . tab control 1 . tab = Dend if call单选框display () End EventSub单选框display()Option = form 1 . tab control 1 . tab select case选项case 0 form 1 . Option box 1 . value = 1 case 1 form 1 . Option box 2 . value = 1 case 2 form 1 . Option box 3 . value = 1 case 3 form 1 . optio nbox 4 .Value =大小写4格式1。option box 5 . Value = 1 case else en和SelectEnd Sub

复制代码

标记热区

什么是热点区域?所谓热区,是指演示窗口中的一个长方形区域,通过它可以获得相应的反馈信息。与按钮响应相比,这种响应类型更容易与背景风格相协调,使界面看起来更好。目前,该键不支持热区。让我们看看如何用标签实现热区。

骚气值:五星,很骚气。

功能:点击菜单后,会出现子菜单选项。

效果演示:

主控件标签、图像控件、选项卡、组合框总体思路:1拿一张自己喜欢的图片做背景。

2绘制标签:菜单、按键学院、学习、工作、游戏等。

3使用组合框作为点击菜单后显示的子菜单。组合框里放了三个标签,学习,工作,游戏。(重点学院子菜单相同)

4接下来是标签的隐藏设置。点击重点研究所,菜单的子菜单将被隐藏,重点研究所的子菜单将被显示。

5更重要的是,还需要创建一个透明的标签,标签的大小和界面一样大。标签事件中隐藏了两个子菜单,这样当我们用鼠标点击其他地方时,子菜单就消失了。

代码:Event Form1.LoadEnd EventEvent Form1.菜单.ClickCall 重置菜单Form1.菜单列表.Visible = 1Form1.L1.Caption = \”学习\”Form1.L2.Caption = \”工作\”Form1.L3.Caption = \”游戏\”Form1.L1.Visible = 1Form1.L2.Visible = 1Form1.L3.Visible = 1End EventEvent Form1.按键学院.ClickCall 重置菜单Form1.菜单列表.Visible = 1Form1.L1.Caption = \”学院院刊\”Form1.L2.Caption = \”学习资源\”Form1.L3.Caption = \”课堂\”Form1.L1.Visible = 1Form1.L2.Visible = 1Form1.L3.Visible = 1End EventSub 重置菜单()Form1.菜单列表.Visible=0Form1.L1.Visible=0Form1.L2.Visible=0Form1.L3.Visible = 0Form1.学习选项卡.Visible=0End SubEvent Form1.取消.ClickCall 重置菜单End EventEvent Form1.L1.ClickIf Form1.L1.Caption = \”学习\” Then Form1.学习选项卡.Visible = 1Form1.返回.Visible = 1End IfEnd EventEvent Form1.返回.ClickCall 重置菜单End Event

温馨提示:内容均由网友自行发布提供,仅用于学习交流,如有版权问题,请联系我们。