■文字列から日付オブジェクトを生成する
□出力結果
2013/04/07 21:23:06
2013/04/07 21:23:06
フォーマットが一致していません
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 件のコメント:
コメントを投稿