2013年4月7日日曜日

[VB.NET]文字列から日付オブジェクトを生成する


■文字列から日付オブジェクトを生成する
Module Module1

    Sub Main()

        Dim DateStr As String
        Dim FormatStr As String
        Dim DateTimeObj As DateTime

        DateStr = "2013-04-07[21:23:06]"
        FormatStr = "yyyy-MM-dd[HH:mm:ss]"
        DateTimeObj = DateTime.ParseExact(DateStr, FormatStr, Nothing)

        Console.WriteLine(DateTimeObj.ToString) '2013/04/07 21:23:06

        DateStr = "20130407212306"
        FormatStr = "yyyyMMddHHmmss"
        DateTimeObj = DateTime.ParseExact(DateStr, FormatStr, Nothing)

        Console.WriteLine(DateTimeObj.ToString) '2013/04/07 21:23:06

        'フォーマットが一致しない場合FormatExceptinの例外を出すのでエラー処理を含めて記述すると
        Try
            DateStr = "20130407212306"
            FormatStr = "yyyyMMdd" 'フォーマットが一致していない場合
            DateTimeObj = DateTime.ParseExact(DateStr, FormatStr, Nothing)

        Catch Ex As System.FormatException
            Console.WriteLine("フォーマットが一致していません")
            End
        End Try

        Console.WriteLine(DateTimeObj.ToString)
    End Sub

End Module

□出力結果
2013/04/07 21:23:06
2013/04/07 21:23:06
フォーマットが一致していません

0 件のコメント: