vb6.0怎么设置弹窗倒计时器效果?
百度经验 发布时间：2018-08-31 16:48:41 作者：年糕飘香 
我要评论
我要评论vb6.0怎么设置弹窗倒计时器效果？vb6.0中想要制作一个倒计时的效果，该怎么制作倒计时呢？下面我们就来看看详细的教程，需要的朋友可以参考下
VB6.0中想要制作一个多功能弹窗倒计时器，该怎么制作呢？下面我们就来看看详细的教程。
1、打开vb6，创建一个标准EXE。
2、添加1个时钟组件，Enbled设定为False。
3、添加3个文字组件。
4、添加4个按钮组件。
5、添加1个Frame组件。
6、添加3个文字组件、3个Text组件和3个按钮组件。
7、双击窗体打开程序窗，输入：
Private Sub Command3_Click() L1.Caption = 300 Timer1.Enabled = True End Sub Private Sub Command4_Click() L1.Caption = 600 Timer1.Enabled = True End Sub Private Sub Command5_Click() Timer1.Enabled = True End Sub Private Sub Command6_Click() Text3.Text = Text2.Text * 60 Text2.Text = " " End Sub Private Sub Command7_Click() Text4.Text = Text3.Text * 60 Text3.Text = " " End Sub Private Sub Command8_Click() L1.Caption = Text4.Text Text4.Text = " " Timer1.Enabled = True End Sub Private Sub Form_Load() End Sub Private Sub Timer1_Timer() L1.Caption = Val(L1.Caption) - 1 If L1.Caption < 1 Then MsgBox "时间到" Timer1.Enabled = False Unload Me End If End Sub
以上就是vb6.0制作倒计时效果的教程，希望大家喜欢，请继续关注脚本之家。
相关推荐：
相关文章
VB6.0一串数字怎么拆分成单个数字？VB6.0表格中输入的一串数字想要拆分成单个的数字，该怎么拆分呢？下面我们就来看看详细的教程，需要的朋友可以参考下2018-07-30
VB6.0标签框怎么使用？VB6.0中想要使用标签框，该怎么使用呢？下面我们就来看看详细的教程，很简单，需要的朋友可以参考下2018-06-25
VB6.0怎么编写一个加法计算器？VB6.0中想要制作一个加法计算器，该怎么制作呢？下面我们就来看看详细的教程，需要的朋友可以参考下2018-06-06
VB6.0中有哪些控件？该怎么使用这些控件呢？下面我们就来看看VB6.0基本控件介绍与使用方法，很基础的教程，需要的朋友可以参考下2018-06-05
VB6.0怎么调用带参数的DLL？VB6.0中想要调用dll文件，该怎么调用带参数的dell文件，下面我们就来看看详细的教程，需要的朋友可以参考下2018-05-23
VB6.0怎么设置字体格式？VB6.0中默认的字体太小，想要调整字体的大小，该怎么调整呢？下面我们就来看看vb6.0设置字体大小的教程，需要的朋友可以参考下2018-04-24
vb6怎么判断word文件是否打开? vb6判断文件能否打开的教程
vb6怎么判断word文件是否打开？vb6中想要制作一个判断文件能否打开的程序，该怎么制作呢？今天我们就来看看vb6判断word文件是否打开的教程，需要的朋友可以参考下2018-04-23
vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的制作方法
vb6.0怎么制作一个抽奖小程？vb6.0中想要设计一个抽奖的小程序，该怎么制作随机抽奖器呢？下面我们就来看看vb6.0抽奖器的制作方法，需要的朋友可以参考下2018-01-14
最新评论