DateAdd函數 返回

創新互聯是一家專業提供容城企業網站建設,專注與成都網站建設、做網站、html5、小程序制作等業務。10年已為容城眾多企業、政府機構等服務。創新互聯專業網絡公司優惠進行中。
返回包含一個日期的 Variant (Date),這一日期還加上了一段時間間隔。
語法
DateAdd(interval, number, date)
DateAdd 函數語法中有下列命名參數:
部分 描述
interval 必要。字符串表達式,是所要加上去的時間間隔。
number 必要。數值表達式,是要加上的時間間隔的數目。其數值可以為正數(得到未來的日期),也可以為負數(得到過去的日期)。
date 必要。Variant (Date) 或表示日期的文字,這一日期還加上了時間間隔。
DateDiff函數 返回
返回 Variant (Long) 的值,表示兩個指定日期間的時間間隔數目。
語法
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
DateDiff 函數語法中有下列命名參數:
部分 描述
interval 必要。字符串表達式,表示用來計算date1 和 date2 的時間差的時間間隔
Date1□date2 必要;Variant (Date)。計算中要用到的兩個日期。
Firstdayofweek 可選。指定一個星期的第一天的常數。如果未予指定,則以星期日為第一天。
firstweekofyear 可選。指定一年的第一周的常數。如果未予指定,則以包含 1 月 1 日的星期為第一周。
給你個例子:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyEndDate As New DateTime(2012, 8, 8)
Dim MyStartDate As DateTime = DateTime.Now
Dim MySpan As TimeSpan = MyEndDate.Subtract(MyStartDate)
Dim MyInfo As String = "離2012年8月8日還有" + _
Math.Round(MySpan.TotalDays, 0).ToString() + "天"
MessageBox.Show(MyInfo, "信息", _
MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
可以使用VB.NET中的DataTime對象的AddMonths方法:
Dim d1 As Date = Now
MsgBox(d1) '顯示現在的機器日期與時間
MsgBox(d1.AddMonths(2)) '顯示現在的機器日期加上2個月的對應日期與時間
MsgBox(d1.AddMonths(-1)) '顯示現在的機器日期減掉1個月的對應日期與時間
DataTime對象的方法很多,你可以通過在線查閱,例如:
d1.Add()
d1.AddDays()
d1.AddHours()
d1.AddMinutes()
d1.AddSeconds()
d1.AddYears()
等等!
注意:從字面意思可以理解是加,而括號里是填寫對應的數值,當數值為負數,起到減的作用了。
新建一個LABEL控件
然后在FORM_LOAD 事件中輸入
Label1.caption=year(now()) 'year可以換成month,day,hour,minute,second
label1.caption=label1.caption-1 '減號后面可以輸入你想要的數字
就OK了
分享名稱:vb.net日期減月 vb日期加減
新聞來源:http://www.yijiale78.com/article0/dooegio.html
成都網站建設公司_創新互聯,為您提供搜索引擎優化、小程序開發、、定制開發、做網站、靜態網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯