Dim w As String
成都創(chuàng)新互聯(lián)于2013年成立,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司,擁有項(xiàng)目網(wǎng)站設(shè)計(jì)制作、成都做網(wǎng)站網(wǎng)站策劃,項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命,1280元微山做網(wǎng)站,已為上家服務(wù),為微山各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:18980820575
If Now.DayOfWeek = DayOfWeek.Sunday Then
w = "天"
ElseIf Now.DayOfWeek = DayOfWeek.Monday Then
w = "一"
ElseIf Now.DayOfWeek = DayOfWeek.Tuesday Then
w = "二"
ElseIf Now.DayOfWeek = DayOfWeek.Wednesday Then
w = "三"
ElseIf Now.DayOfWeek = DayOfWeek.Thursday Then
w = "四"
ElseIf Now.DayOfWeek = DayOfWeek.Friday Then
w = "五"
Else
w = "六"
End If
Label1.Text = (Format(Now.Year "年" Now.Month "月" Now.Day "日" " " "星期" w " " Now.Hour ":" Now.Minute ":" Now.Second))
End Sub
開(kāi)發(fā)過(guò)程過(guò)程中我們通常對(duì)特定代碼片運(yùn)行所花的時(shí)間很感興趣 當(dāng)然有一些標(biāo)準(zhǔn)程序和代碼工具可以查看到它 但是有經(jīng)驗(yàn)的Visual Basic 開(kāi)發(fā)者有更快的辦法 僅僅捕捉開(kāi)始時(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ò)誤消息是 日期類型沒(méi)有定義 - 操作符 這意味著我們不能執(zhí)行減法 日期數(shù)據(jù)類型不支持減法操作 那么我們?cè)趺吹玫絻纱螘r(shí)間的差別呢?
答案就是使用TimeSpan類 它是用于保持時(shí)間段的 上面的代碼看起來(lái)與 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
用日期函數(shù)day()可獲得當(dāng)前日期,time()可獲得當(dāng)前系統(tǒng)時(shí)間.
dim CurDay as string
dim CurTime as string
curday=day()
curtime=time()
Label1.Caption = Date
就能在Label16顯示當(dāng)前日期
now 這個(gè)函數(shù)可以獲得當(dāng)前系統(tǒng)時(shí)間(包括年月日,小時(shí)分鐘秒)
而
year()
month()
day()
等等則可以從now返回的值中分別提取年,月,日的信息
TextBox12.Text = DateTimePicker1.Value.ToString("yyyy/MM/dd")
這樣格式化一下就可以了
不是 有 函數(shù)嘛?
now() 就是 吧
取得 后 再 分離出你所需的,分別賦值 就行了,當(dāng)然 還是 有 函數(shù)的
文章名稱:vb.net只顯示月日的簡(jiǎn)單介紹
本文鏈接:http://muchs.cn/article14/hheege.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供響應(yīng)式網(wǎng)站、微信公眾號(hào)、網(wǎng)站排名、App設(shè)計(jì)、自適應(yīng)網(wǎng)站、企業(yè)網(wǎng)站制作
聲明:本網(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í)需注明來(lái)源: 創(chuàng)新互聯(lián)