บวก ลบ วันที่ in vb.net

         ใน vb.net มีการบวก ลบ วันที่ ซึ่งมีหลากหลายรูปแบบ และผลต่างแต่ละรูปแบบก็แล้วแต่การนำมาใช้งานของโปรแกรมนั้นๆ วันนี้มาดูกัน มีแบบไหนบ้าง

1. DateDiff() เปรียบเทียบวันที่เวลาระหว่าง เวลา1 และ เวลา2

Syntax
DateDiff(DateInterval,Date1,Date2)


DateInterval  มีดังนี้ เยอะมาก
DateInterval.Day
DateInterval.DayOfYear
DateInterval.Hour
DateInterval.Minute
DateInterval.Month
DateInterval.Quarter
DateInterval.Second
DateInterval.Weekday
DateInterval.WeekOfYear
DateInterval.Year

Example
Private Sub DateDiff_Show()
        Dim D1 As Date = "#01/01/2013#"
        Dim D2 As Date = "#01/12/2013#"

        Dim T1 As Date = "#05:02:22#"
        Dim T2 As Date = "#10:10:55#"

        Me.txt_D1.Text = DateDiff(DateInterval.Day, D1, D2)
        Me.txt_D2.Text = DateDiff(DateInterval.Year, D1, D2)
        Me.txt_D3.Text = DateDiff(DateInterval.Month, D1, D2)

        Me.txt_D4.Text = DateDiff(DateInterval.DayOfYear, D1, D2)
        Me.txt_D5.Text = DateDiff(DateInterval.Weekday, D1, D2)
        Me.txt_D6.Text = DateDiff(DateInterval.WeekOfYear, D1, D2)
        Me.txt_D7.Text = DateDiff(DateInterval.Quarter, D1, D2)

        Me.txt_D8.Text = DateDiff(DateInterval.Hour, T1, T2)
        Me.txt_D9.Text = DateDiff(DateInterval.Minute, T1, T2)
        Me.txt_D10.Text = DateDiff(DateInterval.Second, T1, T2)
End Sub

 

Download Semple Coding in vb.net Project

http://www.mediafire.com/?wmp8c21ke8bu6ne

** บทความที่เกี่ยวข้อง **
แสดงรูปแบบวันที่ ค.ศ. และ พ.ศ. VB.NET
Convers String to Date in vb.net
DateAdd แสดงการเพิ่มวันที่และช่วงเวลา
บวก ลบ วันที่ / DateDiff เปรียบเทียบวันที่และเวลา
FormatDateTime
หาวันนี้ปัจจุบัน DateNow
รูปแบบวันที่ เพิ่มเติม