開發(fā)過程過程中我們通常對特定代碼片運行所花的時間很感興趣 當(dāng)然有一些標(biāo)準(zhǔn)程序和代碼工具可以查看到它 但是有經(jīng)驗的Visual Basic 開發(fā)者有更快的辦法 僅僅捕捉開始時間(使用Now關(guān)鍵字)和終止時間(再次使用Now關(guān)鍵字) 兩種相減 就能知道結(jié)果了
成都創(chuàng)新互聯(lián)2013年開創(chuàng)至今,先為南山等服務(wù)建站,南山等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為南山企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
如果使用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
設(shè)計界面雙擊那個按鈕(自動跳到代碼里)
然后輸入 要顯示時間的那個Label.Text = DateTime.Now.ToString()
定時器中處理
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
將datePicker設(shè)置為該日期,這樣就可以確保每次從nib中加載此視圖時,選取器都會重置為當(dāng)前得日期和時間就可以了。