
DateTime.ParseExactについてハマっております。
VB2010環境にてDateTime.ParseExactの質問をさせてください。
http://www.atmarkit.co.jp/fdotnet/dotnettips/203 …
こちらのページを参考してDateTime.ParseExactの使い方を練習しております。
この2つについては希望通り出力されました。
Dim d, f As String
Dim dt As DateTime
d = "20040824202306"
f = "yyyyMMddHHmmss"
dt = DateTime.ParseExact(d, f, Nothing)
d = "2004年08月24日20時23分06秒"
f = "yyyy年MM月dd日HH時mm分ss秒"
dt = DateTime.ParseExact(d, f, Nothing)
しかし、これについてエラーが出てしまいます。
d = "2004/08/24 20:23:06"
f = "yyyy/MM/dd HH:mm:ss"
dt = DateTime.ParseExact(d, f, Nothing)
「FormatException はハンドルされませんでした。
文字列は有効な DateTime ではありませんでした。」
試しに日付だけにして試してみましたがやはり同じエラーが出ます。
d = "2004/08/24"
f = "yyyy/MM/dd"
dt = DateTime.ParseExact(d, f, Nothing)
どこが間違っているのでしょうか。
ご指導のほど、よろしくお願い致します。
No.1ベストアンサー
- 回答日時:
Windowsの地域設定の中の日付の区切り文字が『/』以外に設定されていませんか
Dim Cul as new System.Globalization.CultureInfo("ja-JP")
dim ss as string = cul.DateTimeFormat.DateSeparator
if ss<>"/" then
d = d.Relpace("/",ss)
f = f.Replace("/",ss)
end if
dt = DateTime.ParseExact(d, f, Nothing)
'
' または
'
' if ss<>"/" then
' cal.DateTimeFormat.DateSeparator = "/"
' end if
' dt = DateTime.ParseExact(d, f, cul)
といった具合にして見ましょう
ご回答ありがとうございます。
ご指摘頂きました方法で実行し、希望通りの出力を得ることができました。
自分一人では1週間悩んでも解決できなかったと思います。
本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
Outlook.ApplicationをCreateOb...
-
なぜこんな初歩的なVBAのIf文で...
-
VBAでのエラー
-
【マクロ】エラー【#DIV/0!】が...
-
実行時エラー3001「引数が間違...
-
VB.netでのオートフィルタについて
-
ADODB.Streamを使用してUTF-8を...
-
デバッグ時はOK、デバッグ無し...
-
C言語 mallocのエラーに関する質問
-
実行時エラー -'-2147417848
-
EXCEL/VBAで、自分のPCだけエラ...
-
VB6+SQL サーバー 2000 で 実行...
-
実行時エラー9 インデックスが...
-
VBAでピボットテーブルの作成(...
-
VBA Sortメソッドについて
-
EOFError: EOF when reading a ...
-
なぜエラーになるのでしょうか...
-
実行時エラー48発生時のDLL特定...
-
『実行時エラー 5 プロシージャ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
VBAがブレークモードになっ...
-
【マクロ】エラー【#DIV/0!】が...
-
なぜこんな初歩的なVBAのIf文で...
-
VBAでのエラー
-
実行時エラー -'-2147417848
-
実行時エラー48発生時のDLL特定...
-
マクロについて教えてください...
-
ExcelVBA Range クラスの Page...
-
EXCEL VBAマクロ中断でデバッグ...
-
実行時エラー3001「引数が間違...
-
EXCEL/VBAで、自分のPCだけエラ...
-
VB6+SQL サーバー 2000 で 実行...
-
VBAのエラー発生場所をメッセー...
-
ADODB.Streamを使用してUTF-8を...
-
【Excel VBA】マクロをボタンに...
-
OLEDB.NETで接続できない
-
なぜエラーになるのでしょうか...
-
INSERT INTOステートメント構文...
-
Outlook.ApplicationをCreateOb...
おすすめ情報