vb6.0怎么设置弹窗倒计时器效果?
番茄系统家园 · 2022-05-07 10:09:02
VB6.0中想要制作一个多功能弹窗倒计时器，该怎么制作呢？下面我们就来看看详细的教程。
- 软件名称：
- Visual Basic 6.0 精简安装版
- 软件大小：
- 5.86MB
- 更新时间：
- 2014-08-25
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免责声明： 凡标注转载/编译字样内容并非本站原创，转载目的在于传递更多信息，并不代表本网赞同其观点和对其真实性负责。如果你觉得本文好，欢迎推荐给朋友阅读；本文链接： https://m.nndssk.com/rjwt/1472071CUyAF.html。
以上就是vb6.0制作倒计时效果的教程，希望大家喜欢，请继续关注。
猜你喜欢
最新应用
热门应用
