定時器中處理

創(chuàng)新互聯(lián)公司主營朔城網(wǎng)站建設的網(wǎng)絡公司,主營網(wǎng)站建設方案,成都APP應用開發(fā),朔城h5重慶小程序開發(fā)搭建,朔城網(wǎng)站營銷推廣歡迎朔城等地區(qū)企業(yè)咨詢
Private?Sub?Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load
Timer1.Interval?=?10?'10毫秒刷新一次
Timer1.Start()?'開啟定時器
End?Sub
Private?Sub?Timer1_Tick(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Timer1.Tick
Label1.Text?=?Now
End?Sub
加入以下代碼:
Private Sub Form_Load()
Text1.Text = Now
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Text1.Text = Now
End Sub
擴展資料:
VB獲取系統(tǒng)當前時間并格式化輸出
用到的函數(shù):
Date函數(shù):返回系統(tǒng)的日期
Now函數(shù):返回系統(tǒng)的日期和時間
Format函數(shù):根據(jù)格式表達式來格式化數(shù)據(jù)
實例:
Private Sub Form_Load()
'設置同步時間顯示
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Label2.Caption = Format(Now, "hh:mm:ss")? ? ? ? ? ? '獲取當前時間
Label4.Caption = Format(Now, "yyyy-mm-dd")? ? ? ? ? '獲取當前日期
Label6.Caption = Format(Now, "yyyy-mm-dd hh:mm:ss") '日期和時間
End Sub
開發(fā)過程過程中我們通常對特定代碼片運行所花的時間很感興趣 當然有一些標準程序和代碼工具可以查看到它 但是有經(jīng)驗的Visual Basic 開發(fā)者有更快的辦法 僅僅捕捉開始時間(使用Now關鍵字)和終止時間(再次使用Now關鍵字) 兩種相減 就能知道結(jié)果了
如果使用Visual Basic NET編寫 首先嘗試的代碼可能是這樣的
Dim StartTime As DateTime = Now {code to check for timing goes here} Dim EndTime As DateTime = Now Console WriteLine((StartTime EndTime) ToString)
但是這段代碼的最后一行有語法錯誤 錯誤消息是 日期類型沒有定義 - 操作符 這意味著我們不能執(zhí)行減法 日期數(shù)據(jù)類型不支持減法操作 那么我們怎么得到兩次時間的差別呢?
答案就是使用TimeSpan類 它是用于保持時間段的 上面的代碼看起來與 NET框架組件中的相似
Dim StartTime As DateTime = Now {code to check for timing goes here} Dim EndTime As DateTime = Now Dim RunLength As System TimeSpan RunLength = EndTime Subtract(StartTime) Console WriteLine(RunLength ToString)
計算使用的是類Date的Subtract方法 最后一行將輸出時間的跨度 格式化成小時 分鐘和秒(包括秒的小數(shù)位) 典型的輸出是這樣的
該時間跨度是 秒半 盡管顯示了 位小數(shù) 但是只能相信兩位 但是已經(jīng)足夠了
結(jié)論
lishixinzhi/Article/program/net/201311/11820
設計界面雙擊那個按鈕(自動跳到代碼里)
然后輸入 要顯示時間的那個Label.Text = DateTime.Now.ToString()
網(wǎng)頁名稱:vb.net顯示當前時間的簡單介紹
網(wǎng)站地址:http://chinadenli.net/article10/hhgcdo.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供用戶體驗、電子商務、定制開發(fā)、營銷型網(wǎng)站建設、靜態(tài)網(wǎng)站、軟件開發(fā)
聲明:本網(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)