霓虹灯循环变色VB小程序 - 冷眸软件库

霓虹灯循环变色VB小程序


广告

老司机福利 老司机福利 老司机福利 老司机福利 老司机福利 老司机福利
老司机福利 老司机福利 老司机福利 老司机福利 老司机福利 老司机福利

作者: 冷眸

全网最全的网络资源分享网站

手机扫码查看

特别声明:文章多为网络转载,资源使用一般不提供任何帮助,特殊资源除外,如有侵权请联系!

霓虹灯循环变色VB小程序

 

霓虹灯循环变色VB小程序

 

冷眸软件库说明:

霓虹灯循环变色VB小程序

输入几次循环次数,霓虹灯就变色几次,容易操作

 

VB小程序源码如下:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwmilliseconds As Long)

Private Sub Command1_Click()
Label1.Visible = True
Label2.Visible = False
Label3.Visible = False
Form1.Refresh
Sleep 500

Label1.Visible = False
Label2.Visible = True
Label3.Visible = False
Form1.Refresh
Sleep 500

Label1.Visible = False
Label2.Visible = False
Label3.Visible = True
Form1.Refresh
Sleep 500

Label1.Visible = True
Label2.Visible = True
Label3.Visible = True
Form1.Refresh
Sleep 500

Dim n As Integer
n = Val(Text1.Text)
For i = 1 To n
Next i
End Sub

 

直接运行程序:冷眸软件库提供:https://www.lanzous.com/i7dzkid

 

各位有时间就来我的小站走走,每天分享各种精品资源

官方唯一网站:冷眸软件库 www.lmrjk.cn

冷眸QQ2224302344

分享到:
打赏
未经允许不得转载:有问题请咨询2224302344

作者: 冷眸,QQ2224302344 转载或复制请以 超链接形式 并注明出处 冷眸软件库
原文地址: 《霓虹灯循环变色VB小程序》 发布于2019-11-15

评论

未显示?请点击刷新
切换注册

登录

您也可以使用第三方帐号快捷登录

切换登录

注册

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏