「ゼロ」を表示させたい

解決

くーちゃん  2008-09-24 17:18:29  No: 140515  IP: 192.*.*.*

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

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

Dim InputDate as string

InputDate = Year(Date) & Month(date)

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

編集 削除
９月  2008-09-24 21:44:37  No: 140516  IP: 192.*.*.*

下記の様にして下さい。

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

編集 削除
魔界の仮面弁士  2008-09-25 02:51:43  No: 140517  IP: 192.*.*.*

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

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


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

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

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

編集 削除
くーちゃん  2008-09-25 11:19:56  No: 140518  IP: 192.*.*.*

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

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

編集 削除