おーい。日本国の年号にならない。
平成2003になる。
何とかしてくれ。
lblDate.Caption = Format(Date, "平成yyyy年mm月dd日") & Format(Time, "hh時mm分ss秒")