ในหลายครั้งของการเขียนโปรแกรมมักจะมีการทำงานกับวันที่ของระบบ
ดังนั้น VB.NET จึงได้เตรียมฟังก์ชันที่ทำงานกับัวนที่ให้เลือกมากมาย
ดังตัวอย่างต่อไปนี้
ฟังก์ชัน
Date.Now
ฟังก์ชัน
Date.Today
ฟังก์ชัน
DateAdd
ฟังก์ชัน
DateDiff
ฟังก์ชัน
Format
ฟังก์ชัน
Date.Now
Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
MsgBox(Date.Now)
End Sub
ผลลัพธ์ที่ได้

ฟังก์ชัน
Date.Today
Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
MsgBox(Date.Today)
End Sub
ผลลัพธ์ที่ได้

ฟังก์ชัน
DateAdd()
Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
'
สมมุติต้องการ ทราบ ว่าอีก 7 วันนับจากวันนี้ เป็น วันที่เท่าใหร่
สามารถเขียนคำสั่งดังนี้
MsgBox(DateAdd(DateInterval.Day,
7, Today))
End Sub
ฟังก์ชัน
DateDiff ใช้สำหรับหาผลต่างของ วันที่ 2 วัน ดังตัวอย่าง
Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
'
สมมุติต้องการ ผลต่างของ วัน ที่ "18/08/2007"
กับ "19/09/2007" จะเขียนคำสั่งดังนี้
Dim d1 As Date = "18/08/2007"
Dim d2 As Date = "19/09/2007"
MsgBox(DateDiff(DateInterval.Day, d1, d2))
'ผลลัพธ์
จะได้ 32 วัน
End
Sub
|