「ゼロ」を表示させたい

解決

くーちゃん 2008-09-25 02:18:29 No: 140515

すごく初歩的な事かもしれませんが教えてください。

変数InputDateの中に年月を入れたいと思います。
私のイメージでは、「200809」となって欲しいのですが、実際には、「20089」というデータが入ってしまいます。

Dim InputDate as string

InputDate = Year(Date) & Month(date)

どのようにすれば月を「09」というように2桁表示させることができますでしょうか？

９月 2008-09-25 06:44:37 No: 140516

下記の様にして下さい。

InputDate = Year(Date) & Right$("0" & Month(Date), 2)

魔界の仮面弁士 2008-09-25 11:51:43 No: 140517

> すごく初歩的な事かもしれませんが教えてください。

できれば、データ型を意識してコーディングするようにしてみてください。
「& 演算子」は、文字列型の連結に使われるものであって、数値型に対して
利用されるべきものではありません。

> どのようにすれば月を「09」というように2桁表示させることができますでしょうか？
VBA/VB6 かな? であればこんな感じ。

InputDate = CStr(Year(Date) * 100 + Month(date))

この他、"Format 関数" を用いる方法などもあります。

くーちゃん 2008-09-25 20:19:56 No: 140518

９月様、魔界の仮面弁士様

できました。アドバイスありがとうございました！