vb.net 日期時間

Dim dMyDate As DateTime = DateTime.Now‘當前時間日期

 DateDiff("h", C13, C3)’ 二時間差

 ‘日期格式

C2 = Format(dMyDate, "yyyy-MM-dd_HH:mm:ss")

DateTimePicker1.Value = dMyDate.Date

 ‘日期加減

DateTimePicker1.Value = DateTimePicker1.Value.AddDays(-15)

DateTimePicker2.Value = DateTimePicker2.Value.AddDays(90)

Dim dMyDate As DateTime = DateTime.Now

T1 = Format(dMyDate.AddDays(-1), "yyyy-MM-dd")

T1 = Format(dMyDate.AddMonths(-i), "yyyy-MM")

     Enum myWeek

         周日 = 1

         周一 = 2

         周二 = 3

         周三 = 4

         周四 = 5

         周五 = 6

         周六 = 7

     End Enum

C1 = [Enum].Parse(GetType(myWeek), Weekday(T1)).ToString '星期

C1 = Minute(T1)’分鐘

C1 = Second (T1)’秒

T1 = T2.AddMinutes(10)’加10分鐘

T1 = T2. AddSeconds (10)’加10秒

 日期判別

IsDate(oga05.Text & " 00:00:00")