概要
現在日時を取得するには、DateTime.Now を使用します。DateTime.Now を使うとマシン日時が取得出来ます。また、DateTime.Today を使用するとマシン日付が取得出来ます。
また、DateTime.Now → Date.Now DateTime.Today → Date.Today と書いても同じです。
基本構文
DateTime.Now
DateTime.Today
内容
DateTime型 は 0001/01/01 00:00:00 ~ 9999/12/31 23:259:59 まで管理出来る型です。
DateTime.Now で 年月日時分秒まで取得でき、DataTime.Todayで 年月日(時分秒は 00:00:00)の取得が可能です。
Module Module1
Sub Main()
Console.WriteLine(Date.MinValue) '0001/01/01 0:00:00
Console.WriteLine(Date.MaxValue) '9999/12/31 23:59:59
Console.WriteLine(Date.Now) ' 2020/07/30 13:47:36
Console.WriteLine(Date.Today) '2020/07/30 0:00:00
End Sub
End Module
現在日時を取得する
サンプルコードです。
Module Module1
Sub Main()
Dim dt1 As String = DateTime.Now
Console.WriteLine(dt1) ' 2020/07/30 17:22:17
Dim dt2 As String = DateTime.Today
Console.WriteLine(dt2) ' 2020/07/30
Dim dt3 As DateTime = DateTime.Now
Console.WriteLine((dt3.Year).ToString + "年" _
+ (dt3.Month).ToString + "月" _
+ (dt3.Day).ToString + "日") ' 2020年7月30日
Console.WriteLine((dt3.Hour).ToString + "時" _
+ (dt3.Minute).ToString + "分" _
+ (dt3.Second).ToString + "秒" _
+ (dt3.Millisecond).ToString) ' 17時22分17秒410
Dim dt4 As DateTime = DateTime.Now
Console.WriteLine((dt4.DayOfWeek).ToString) ' Thursday
Console.WriteLine((dt4.DayOfYear).ToString) ' 1/1からの経過日数
Console.WriteLine((dt4.Kind).ToString) ' Local
End Sub
End Module
表示形式
Module Module1
Sub Main()
Dim dt As String = DateTime.Today
Console.WriteLine(dt) '2020/07/09
Console.WriteLine(dt.Replace("/", "")) ' 20200730
Console.WriteLine(dt.Replace("/", "-")) ' 2020-07-30
End Sub
End Module
コメント