新建一個(gè)LABEL控件
禹城網(wǎng)站制作公司哪家好,找創(chuàng)新互聯(lián)!從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、自適應(yīng)網(wǎng)站建設(shè)等網(wǎng)站項(xiàng)目制作,到程序開(kāi)發(fā),運(yùn)營(yíng)維護(hù)。創(chuàng)新互聯(lián)于2013年開(kāi)始到現(xiàn)在10年的時(shí)間,我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn),來(lái)保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)。
然后在FORM_LOAD 事件中輸入
Label1.caption=year(now()) 'year可以換成month,day,hour,minute,second
label1.caption=label1.caption-1 '減號(hào)后面可以輸入你想要的數(shù)字
就OK了
DateAdd函數(shù) 返回
返回包含一個(gè)日期的 Variant (Date),這一日期還加上了一段時(shí)間間隔。
語(yǔ)法
DateAdd(interval, number, date)
DateAdd 函數(shù)語(yǔ)法中有下列命名參數(shù):
部分 描述
interval 必要。字符串表達(dá)式,是所要加上去的時(shí)間間隔。
number 必要。數(shù)值表達(dá)式,是要加上的時(shí)間間隔的數(shù)目。其數(shù)值可以為正數(shù)(得到未來(lái)的日期),也可以為負(fù)數(shù)(得到過(guò)去的日期)。
date 必要。Variant (Date) 或表示日期的文字,這一日期還加上了時(shí)間間隔。
DateDiff函數(shù) 返回
返回 Variant (Long) 的值,表示兩個(gè)指定日期間的時(shí)間間隔數(shù)目。
語(yǔ)法
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
DateDiff 函數(shù)語(yǔ)法中有下列命名參數(shù):
部分 描述
interval 必要。字符串表達(dá)式,表示用來(lái)計(jì)算date1 和 date2 的時(shí)間差的時(shí)間間隔
Date1□date2 必要;Variant (Date)。計(jì)算中要用到的兩個(gè)日期。
Firstdayofweek 可選。指定一個(gè)星期的第一天的常數(shù)。如果未予指定,則以星期日為第一天。
firstweekofyear 可選。指定一年的第一周的常數(shù)。如果未予指定,則以包含 1 月 1 日的星期為第一周。
其實(shí)vb提供了一個(gè)計(jì)算兩個(gè)日期相差的函數(shù)datediff,
在實(shí)際應(yīng)用之中我們可以進(jìn)行日期相減運(yùn)算,但是vb推薦的還是
使用vb自己提供的內(nèi)部函數(shù)為好!
一個(gè)例子:
Private Sub Command1_Click()
Dim days As Integer
Dim data1 As Date
Dim data2 As Date
data1 = #2/21/2006# 'O2 / 21 / 2006
data2 = #3/21/2006#
days = DateDiff("d", data1, data2)
Text1.Text = Str(days)
End Sub
當(dāng)前名稱:vb.net日期減一天 vbs 日期加減
當(dāng)前URL:http://muchs.cn/article0/hggooo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供做網(wǎng)站、企業(yè)建站、網(wǎng)站維護(hù)、網(wǎng)站營(yíng)銷、手機(jī)網(wǎng)站建設(shè)、App設(shè)計(jì)
聲明:本網(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)