Sub?gettime()
成都創(chuàng)新互聯(lián)公司主要從事成都做網(wǎng)站、成都網(wǎng)站設(shè)計(jì)、網(wǎng)頁(yè)設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)于田,十多年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):18982081108
nowtime?=?Format(DateTime.Now,?"yyyy/MM/dd?hh:mm:ss")
MsgBox?nowtime
End?Sub
其中DateTime.Now為當(dāng)前系統(tǒng)的時(shí)間
Format是設(shè)置時(shí)間格式
效果如下
vb中獲取系統(tǒng)當(dāng)前的時(shí)間用函數(shù) now() 就可以。另外還有相關(guān)的時(shí)間 date() time()\x0d\x0anow()獲取系統(tǒng)當(dāng)前日期和時(shí)間,如:2015-12-12 22:23:34\x0d\x0atime()獲取系統(tǒng)的時(shí)間,如:22:23:34不顯示當(dāng)前日期\x0d\x0adate()獲得系統(tǒng)的日期,如:2015-12-12\x0d\x0a\x0d\x0aPrivate Sub Command1_Click()\x0d\x0aMsgBox Now()\x0d\x0aMsgBox Time()\x0d\x0aMsgBox Date\x0d\x0aEnd Sub
開發(fā)過程過程中我們通常對(duì)特定代碼片運(yùn)行所花的時(shí)間很感興趣 當(dāng)然有一些標(biāo)準(zhǔn)程序和代碼工具可以查看到它 但是有經(jīng)驗(yàn)的Visual Basic 開發(fā)者有更快的辦法 僅僅捕捉開始時(shí)間(使用Now關(guān)鍵字)和終止時(shí)間(再次使用Now關(guān)鍵字) 兩種相減 就能知道結(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)
但是這段代碼的最后一行有語(yǔ)法錯(cuò)誤 錯(cuò)誤消息是 日期類型沒有定義 - 操作符 這意味著我們不能執(zhí)行減法 日期數(shù)據(jù)類型不支持減法操作 那么我們?cè)趺吹玫絻纱螘r(shí)間的差別呢?
答案就是使用TimeSpan類 它是用于保持時(shí)間段的 上面的代碼看起來與 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)
計(jì)算使用的是類Date的Subtract方法 最后一行將輸出時(shí)間的跨度 格式化成小時(shí) 分鐘和秒(包括秒的小數(shù)位) 典型的輸出是這樣的
該時(shí)間跨度是 秒半 盡管顯示了 位小數(shù) 但是只能相信兩位 但是已經(jīng)足夠了
結(jié)論
lishixinzhi/Article/program/net/201311/11820
本文標(biāo)題:關(guān)于vb.net得到當(dāng)前時(shí)間的信息
文章位置:http://sd-ha.com/article26/doijicg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供自適應(yīng)網(wǎng)站、定制開發(fā)、網(wǎng)頁(yè)設(shè)計(jì)公司、做網(wǎng)站、App設(shè)計(jì)、外貿(mào)建站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)