"yyyy年MM月dd日 HH時ｍｍ分"文字列をyyyy/MM/dd HH:mmのDatetimeに変更する方法を教えてください。

Question

いつもお世話になっております。

今回のご質問は、よくある文字列を日付に変換ですが、
「2019/01/24」という形式ならDatetime型に日付変換はすぐできますが、今やりたい変換は下記になります。
0. 番号リスト「2019年01年24日 18時37分」
0. 番号リスト「yyyy/MM/dd HH:mm」
１を２に変換したいと思っています。
試行錯誤や調べてましたが、上記形式を変換方法がうまくできず分からなくなっています。

Dim stDate As String = "2019年01月24日 18時37分"

上記変数を「yyyy/MM/dd HH:mm」形式に変換して、
日付を比較したいと思っています。

Dim dtmDateA as datetime = Date.paese(stDate)　'ここの変換ができないでいます。
Dim dtmDateB as datetime = "2019/01/24 00:00:00"
'dtmDateAがdtmDateB以降の日付の際に、Trueを返す
if Date.Compare(dtmDateA, dtmDateB) <= 0 then
messagebox.show("True")
else
messagebox.show("False")
End if

上記コードのコメント箇所が、日付変換できないのですが、
どうしたら「yyyy/MM/dd HH:mm」の形式に変換して、
If分の日付の比較ができるか、を悩んでいます。

前回教えていただきました、内容と少し被るところもありますが、
教えていただけると幸いです。

Comments

[x_x]

2019年01年というのは誤記ですかね？

[rara]

01年は誤記でした。
コードはここで記載しているので、
気が付きませんでした。ご指摘ありがとうございます。

Answer 1

DateTime.ParseExactメソッドを使用してください

もし、入力の文字列が正常な値である保証がないのであれば（例えば2020年13月1日とか）
前回でお答えしたようにTryParseExactを使用してください。

Comments

[rara]

Datetime.ParseExact、TryParseExactで、日付変換ができるかのチェックを早速使用したいと思います。
日付と文字列処理は、基本なのですが
まだ不慣れで、少しずつでも精進していきたいと思います。

ありがとうございます。

Answer 2

Parseがpaeseになっているという問題？

Dim dtmDateA as datetime = Date.paese(stDate)
↓
Dim dtmDateA as datetime = Date.Parse(stDate)

それから比較の不等号が逆ですね。

if Date.Compare(dtmDateA, dtmDateB) <= 0 then
↓
if Date.Compare(dtmDateA, dtmDateB) >= 0 then

Comments

[rara]

＞Parseがpaeseになっているという問題？
こちらも誤記でした。
ご指摘ありがとうございます。

不等号のほうは、
Aがexeファイルの実行日、つまりDate.Nowの日付で、
Bのほうは、前回exeファイルを実行した日になります。
間違えていたようです。ありがとうございます。