「VB.NET」CompareToで日付DateTimeの前後を調べる
書式
Public Function CompareTo (value As DateTime) As Integer
このインスタンスの値と指定した DateTime の値を比較し、このインスタンスの値が指定した
DateTime の値よりも前か、同じか、または後かを示す整数を返します。
使用例
Module Module1 Sub Main() 'DateTiem型変数 Dim dtA As DateTime = New DateTime(2021, 9, 28) Dim dtB As DateTime = New DateTime(2021, 10, 29) Dim dtC As DateTime = New DateTime(2021, 9, 30) Dim td As DateTime = DateTime.Today Console.WriteLine("日付: " + td.ToString) '今日と指定DateTimeの値を比較 Dim res1 As Integer = td.CompareTo(dtA) Dim res2 As Integer = td.CompareTo(dtB) Dim res3 As Integer = td.CompareTo(dtC) Console.WriteLine("値1: " + res1.ToString) Console.WriteLine("値2: " + res2.ToString) Console.WriteLine("値3: " + res3.ToString) Console.ReadKey() End Sub End Module
実行結果
日付: 2021/09/30 0:00:00
値1: 1
値2: -1
値3: 0