Form1からForm2へ変数を送る

質問

ＶＢの初心者です。
下のようにコードを記述してみました。
・Form1のdNameをForm2へ送り、ラベルに表示。
・変数dNameは標準モジュールで定義。

**Form1**
dName = delname.Text
Form2.Show

**Form2**
Label.Caption = dName

**標準モジュール**
Dim dName As String

しかし、ラベルにdNameの値が表示されません。
なにか良い解決策を教えてください。

あと、標準モジュールについてわかりやすく教えて下さい。

回答No.6

tochanx · ベストアンサー

#1です。ちょっと補足です。
質問者さんの提示したコードでは何が起こっていたのかを書きます。
まずForm1での変数dNameへのdelname.Textの代入ですが、
Form1からは標準モジュールでDimとして宣言されたdNameは見えません。
見えないのでVBが自動的にForm1用に変数dNameを作ります。
Form1のコードに自動的にDim dNameを書き込むイメージです。
Dim dNameという風にAs Stringなどの型宣言を抜きにすると自動的にAs Variantと宣言したことになります。
そしてForm1用に用意されたdNameにテキストが代入されてForm2を表示させて、
Form2でもdNameがありますが、このdNameもForm2からはForm1や標準モジュールのdNameは見えないのでまたまたVBが自動的にDim dNameとしてVariant型のdNameをForm2用に作ります。
しかしそこでdNameは何も値が入っていません。なにしろ作られたばかりですから、つまり空っぽの状態です。
そしてLabel.Captionに空っぽの文字、つまり何も表示されないということになっていたのです。

今回のような変数に起因するトラブルを未然に防ぐにはとてもよい方法があります。
メニューのツール→オプション→編集タグとたどって、
コードの設定というところに
「変数の宣言を強制する」
というチェックボックスがありますのでそれをオンにして下さい。
これで次回からは使用する変数は必ずDimなりPublicなりで宣言しなければなりません。
たとえば今回の場合これをやっていたら、Form1でdNameに代入しようとした時点で
「変数dNameが宣言されていない」
と警告してくれます。

お礼

丁寧で簡単にわかりやすく説明してくださってありがとうございます。
VBって勝手に変数つくっちゃうんですね。初めて知りました。
変数の宣言を強制することができるんですか。さっそく利用してみます。
ありがとうございました。