now()可以返回當(dāng)前時間,如果你要把它作文件名,那么需要先轉(zhuǎn)換成string,可以使用
讓客戶滿意是我們工作的目標(biāo),不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶,將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴,公司提供的服務(wù)項目有:域名注冊、虛擬空間、營銷軟件、網(wǎng)站建設(shè)、漢南網(wǎng)站維護、網(wǎng)站推廣。
format函數(shù)
,比如format(now(),
用TIMER控件調(diào)用NOW函數(shù),可取得系統(tǒng)的日期和時間:
Private Sub Timer1_Timer()
Text1 = Now
End Sub
兩種方式自己選用
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String
s = DateTime.Today.Year()
s = s DateTime.Today.Month()
s = s DateTime.Today.Day()
s = s DateTime.Now.Hour()
s = s DateTime.Now.Minute()
s = s DateTime.Now.Second()
MsgBox(s, vbDefaultButton1, Now())
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim s As String
s = Format(Now(), "yyyymmddhhmmss")
MsgBox(s, vbYes, Now())
End Sub
用日期函數(shù)day()可獲得當(dāng)前日期,time()可獲得當(dāng)前系統(tǒng)時間.
dim CurDay as string
dim CurTime as string
curday=day()
curtime=time()
Label1.Caption = Date
就能在Label16顯示當(dāng)前日期
now 這個函數(shù)可以獲得當(dāng)前系統(tǒng)時間(包括年月日,小時分鐘秒)
而
year()
month()
day()
等等則可以從now返回的值中分別提取年,月,日的信息
首先建立一個timer控件和一個label控件,之后把timer控件的interval屬性改為1000
之后編寫代碼:
Private Sub Timer1_Timer()
a = Time$
Label1.Caption = "當(dāng)前時間為:" a
End Sub
我想應(yīng)該是,你試試看把……
名稱欄目:關(guān)于vb.net返回時間的信息
文章URL:http://chinadenli.net/article8/dodshop.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供ChatGPT、網(wǎng)站改版、搜索引擎優(yōu)化、電子商務(wù)、云服務(wù)器、App開發(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)