「VB.net」IsDateメソッドでDate値がかどうかを判定

2021年9月8日

書式
Public Function IsDate (Expression As Object) As Boolean
パラメーター
必須です。 Object 式。
戻り値
式が有効な Boolean 値を表しているかどうかを示す Date 値を返します。
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module ModuleTest
Public Sub Main()
'Date型変数名の定義
Dim dateA, dateB As Date
'String型変数名の定義
Dim timeOnly, dateAndTime, noDate As String
'Boolean型変数名
Dim dateCheck As Boolean
'値を設定
dateA = CDate("February 12, 2021")
dateB = #2/12/2021#
timeOnly = "3:45 PM"
dateAndTime = "March 15, 2001 10:22 AM"
noDate = "study vb.net "
Console.WriteLine("指定式がDateかどうかを判定")
dateCheck = IsDate(dateA)
Console.WriteLine(dateCheck)
dateCheck = IsDate(dateB)
Console.WriteLine(dateCheck)
dateCheck = IsDate(timeOnly)
Console.WriteLine(dateCheck)
dateCheck = IsDate(dateAndTime)
Console.WriteLine(dateCheck)
dateCheck = IsDate(noDate)
Console.WriteLine(dateCheck)
Console.ReadKey()
End Sub
End Module
Module ModuleTest Public Sub Main() 'Date型変数名の定義 Dim dateA, dateB As Date 'String型変数名の定義 Dim timeOnly, dateAndTime, noDate As String 'Boolean型変数名 Dim dateCheck As Boolean '値を設定 dateA = CDate("February 12, 2021") dateB = #2/12/2021# timeOnly = "3:45 PM" dateAndTime = "March 15, 2001 10:22 AM" noDate = "study vb.net " Console.WriteLine("指定式がDateかどうかを判定") dateCheck = IsDate(dateA) Console.WriteLine(dateCheck) dateCheck = IsDate(dateB) Console.WriteLine(dateCheck) dateCheck = IsDate(timeOnly) Console.WriteLine(dateCheck) dateCheck = IsDate(dateAndTime) Console.WriteLine(dateCheck) dateCheck = IsDate(noDate) Console.WriteLine(dateCheck) Console.ReadKey() End Sub End Module
Module ModuleTest

    Public Sub Main()
        'Date型変数名の定義
        Dim dateA, dateB As Date

        'String型変数名の定義
        Dim timeOnly, dateAndTime, noDate As String

        'Boolean型変数名
        Dim dateCheck As Boolean

        '値を設定
        dateA = CDate("February 12, 2021")
        dateB = #2/12/2021#
        timeOnly = "3:45 PM"
        dateAndTime = "March 15, 2001 10:22 AM"
        noDate = "study vb.net "

        Console.WriteLine("指定式がDateかどうかを判定")
        dateCheck = IsDate(dateA)
        Console.WriteLine(dateCheck)

        dateCheck = IsDate(dateB)
        Console.WriteLine(dateCheck)

        dateCheck = IsDate(timeOnly)
        Console.WriteLine(dateCheck)

        dateCheck = IsDate(dateAndTime)
        Console.WriteLine(dateCheck)

        dateCheck = IsDate(noDate)
        Console.WriteLine(dateCheck)


        Console.ReadKey()
    End Sub

End Module

結果
指定式がDateかどうかを判定
True
True
True
True
False

VB.net

Posted by arkgame