dim 現(xiàn)在的時間 as date = Now
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)!專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了巫溪免費建站歡迎大家使用!
"Select * From 表 Where 開始的時間= # " 現(xiàn)在的時間 "# And 結(jié)束的時間= # " 現(xiàn)在的時間 " # "
vb中獲取系統(tǒng)當前的時間用函數(shù) now() 就可以。另外還有相關(guān)的時間 date() time()
now()獲取系統(tǒng)當前日期和時間,如:2015-12-12 22:23:34
time()獲取系統(tǒng)的時間,如:22:23:34不顯示當前日期
date()獲得系統(tǒng)的日期,如:2015-12-12
Private Sub Command1_Click()
MsgBox Now()
MsgBox Time()
MsgBox Date
End Sub
vb中獲取系統(tǒng)當前的時間用函數(shù) now() 就可以。另外還有相關(guān)的時間 date() time()\x0d\x0anow()獲取系統(tǒng)當前日期和時間,如:2015-12-12 22:23:34\x0d\x0atime()獲取系統(tǒng)的時間,如:22:23:34不顯示當前日期\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
用日期函數(shù)day()可獲得當前日期,time()可獲得當前系統(tǒng)時間.
dim CurDay as string
dim CurTime as string
curday=day()
curtime=time()
Label1.Caption = Date
就能在Label16顯示當前日期
now 這個函數(shù)可以獲得當前系統(tǒng)時間(包括年月日,小時分鐘秒)
而
year()
month()
day()
等等則可以從now返回的值中分別提取年,月,日的信息
兩種方式自己選用
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
dim myMonth as string= DateTime.Now.tostring("MM")
年月日時分秒
DateTime.Now.tostring("yyyy-MM-dd hh-dd-ss") ‘得到2011-03-30 09-08-05
DateTime.Now.tostring("yy-M-d h-d-s") ‘得到11-3-30 9-8-5