VB6.0中想要制作一個多功能彈窗倒計時器，該怎么制作呢？下面我們就來看看詳細的教程。

軟件名稱：Visual Basic 6.0 精簡安裝版軟件大小：5.86MB更新時間：2014-08-25

1、打開vb6，創(chuàng)建一個標準EXE。

2、添加1個時鐘組件，Enbled設(shè)定為False。

3、添加3個文字組件。

4、添加4個按鈕組件。

5、添加1個Frame組件。

6、添加3個文字組件、3個Text組件和3個按鈕組件。

7、雙擊窗體打開程序窗，輸入：

Private Sub Command3_Click()L1.Caption = 300Timer1.Enabled = TrueEnd SubPrivate Sub Command4_Click()L1.Caption = 600Timer1.Enabled = TrueEnd SubPrivate Sub Command5_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Command6_Click()Text3.Text = Text2.Text * 60Text2.Text = " "End SubPrivate Sub Command7_Click()Text4.Text = Text3.Text * 60Text3.Text = " "End SubPrivate Sub Command8_Click()L1.Caption = Text4.TextText4.Text = " "Timer1.Enabled = TrueEnd SubPrivate Sub Form_Load()End SubPrivate Sub Timer1_Timer()L1.Caption = Val(L1.Caption) - 1If L1.Caption < 1 ThenMsgBox "時間到"Timer1.Enabled = FalseUnload MeEnd IfEnd Sub

以上就是vb6.0制作倒計時效果的教程，希望大家喜歡，請繼續(xù)關(guān)注錯新站長站。

相關(guān)推薦：

VB6.0怎么使用圖片框?

VB6.0怎么快速批量刪除txt內(nèi)容?