用Timer控件吧,設(shè)置1秒執(zhí)行1次。然后直接在Timer中寫代碼,將全全局的值來
創(chuàng)新互聯(lián)專注骨干網(wǎng)絡(luò)服務(wù)器租用10年,服務(wù)更有保障!服務(wù)器租用,西部信息機房 成都服務(wù)器租用,成都服務(wù)器托管,骨干網(wǎng)絡(luò)帶寬,享受低延遲,高速訪問。靈活、實現(xiàn)低成本的共享或公網(wǎng)數(shù)據(jù)中心高速帶寬的專屬高性能服務(wù)器。
減減1,如果值為0,則停止Timer
跳出提示框
以下示例:
int
Tatal
=
100;
Timer.Inveral
=
1000;
Timer_()
{
if
(
Tatal
==
0)
{
MessageBox.Show("完成!");
Timer.Stop();
}
else
{
Tatal
--;
}
}
畫面添加textbox1 timer1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 1000
TextBox1.Text = "2011/12/07 10:35:00"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If IsDate(TextBox1.Text) = True Then
Timer1.Start()
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Format(Now, "yyyy/MM/dd hh:mm:ss") = TextBox1.Text Then
MsgBox("It's time to go")
Timer1.Stop()
End If
End Sub
1、首先,建立一個工程,并在窗口中添加三個命令按鈕,caption分別改為“設(shè)置倒計時”、“啟動倒計時”、“繼續(xù)”,將窗體Form1的caption屬性改為“倒計時”,再添加一個計時器控件,并且添加一個文本框,將界面設(shè)置成如下圖所示。
2、將文本框的Text里的屬性清空干凈,再把字體Font的屬性調(diào)整成為小四,方便接下來的觀察,一定記得把背景色屬性Backcolor調(diào)為淺黃色。
3、接下來,雙擊“設(shè)置倒計時”命令這個按鈕,就會進入到代碼編輯窗口,輸入如圖所示代碼:
4、接著雙擊“啟動倒計時”命令這個按鈕,接下來會進入代碼編輯窗口,再輸入如下圖所示代碼:
5、再接著雙擊“計時器”控件,然后進入代碼編輯窗口,輸入如圖所示代碼:
6、在代碼編輯窗口的通用段進行這三個變量的定義:Dim h As Integer, m As Integer, s As Integer '分別存儲這三個量時、分、秒,如下圖所示。
7、最后再雙擊窗體,然后就會進入代碼編輯器,在?Form_Load事件中寫入代碼,代碼如下圖紅框所示:
8、接著關(guān)閉代碼窗口,按一下F5運行程序,再單擊“設(shè)置倒計時”這個命令按鈕,這時候就會彈出一個輸入對話框,一定要記得此時輸入分鐘數(shù),數(shù)字為1,然后確定,如圖所示:
9、最后一定要單擊“啟動倒計時”這個命令按鈕,然后文本框就會顯示倒計時時間,并會不斷地變動,這個時候你就可以看見時間在變動,這就是實現(xiàn)了倒計時功能,如圖所示:
擴展資料:
使用VB倒計時設(shè)置計時參數(shù)5X60=300秒,然后設(shè)置定時器1S中斷.當(dāng)計時器為0就是5分鐘,將計時器參數(shù)顯示在文本框中就可以了。這個題目需要使用計時器控件,所以計時器的控件的Timer事件以及Enable屬性、Interval屬性需要熟知。
1、打開VB6.0,新建一個工程,在窗體中添加三個命令按鈕,caption分別改為“設(shè)置倒計時”、“啟動倒計時”、“繼續(xù)”,將窗體Form1的caption屬性改為“倒計時”,添加一個計時器控件,添加一個文本框。
2、將文本框的Text屬性清空,將字體Font屬性調(diào)整為小四,便于觀察,將背景色屬性Backcolor調(diào)為淺黃色。
3、雙擊“設(shè)置倒計時”命令按鈕,進入代碼編輯窗口。
4、雙擊“啟動倒計時”命令按鈕,進入代碼編輯窗口。
5、雙擊“計時器”控件,進入代碼編輯窗口。
6、在代碼編輯窗口的通用段進行變量定義:Dim h As Integer, m As Integer, s As Integer '分別存儲時分秒Dim a As Integer。
7、雙擊窗體,進入代碼編輯器,在?Form_Load事件中寫入代碼:Timer1.Enabled = False '先關(guān)閉計時器。
8、關(guān)閉代碼窗口,按下F5運行程序,單擊“設(shè)置倒計時”命令按鈕,彈出輸入對話框,此時輸入分鐘數(shù)為1,確定。
9、單擊“啟動倒計時”命令按鈕,文本框顯示倒計時時間,并時刻變動,至此實現(xiàn)了倒計時功能。
標(biāo)題名稱:vb.net倒計秒表,vbs倒計時
網(wǎng)站網(wǎng)址:http://chinadenli.net/article12/dsiepgc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站設(shè)計公司、網(wǎng)站改版、關(guān)鍵詞優(yōu)化、品牌網(wǎng)站建設(shè)、小程序開發(fā)、云服務(wù)器
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)