vb中怎么做倒計時？

1、打開VB6.0，新建一個工程，在窗體中添加三個命令按鈕，caption分別改為“設置倒計時”、“啟動倒計時”、“繼續”，將窗體Form1的caption屬性改為“倒計時”，添加一個計時器控件，添加一個文本框。

2、將文本框的Text屬性清空，將字體Font屬性調整為小四，便于觀察，將背景色屬性Backcolor調為淺黃色。

3、雙擊“設置倒計時”命令按鈕，進入代碼編輯窗口。

4、雙擊“啟動倒計時”命令按鈕，進入代碼編輯窗口。

5、雙擊“計時器”控件，進入代碼編輯窗口。

6、在代碼編輯窗口的通用段進行變量定義：Dim h As Integer, m As Integer, s As Integer '分別存儲時分秒Dim a As Integer。

7、雙擊窗體，進入代碼編輯器，在 Form_Load事件中寫入代碼：Timer1.Enabled = False '先關閉計時器。

8、關閉代碼窗口，按下F5運行程序，單擊“設置倒計時”命令按鈕，彈出輸入對話框，此時輸入分鐘數為1，確定。

9、單擊“啟動倒計時”命令按鈕，文本框顯示倒計時時間，并時刻變動，至此實現了倒計時功能。