VB6を使用しております
フォーム1でファイルを読み込んで、その値を変数dataに格納しました
変数dataは標準モジュールのDeclarationsセクションで宣言しております
Open App.Path & "\card.txt" For Input As #FileNum
Line Input #FileNum, data
Close #FileNum
次に変数dataをフォーム2で使いたいのですが、フォーム2で使おうとするとEmpty値となっていて、期待通りの動きになりません。
フォーム1で格納した変数をフォーム2で使うには、どうしたらいいのでしょうか?
どなたかご教授お願いいたします。
Msgbox Form1.data
ではどうでしょう?
・Form1やForm2でdata変数を宣言していませんか?
・データの取得タイミングは正しいですか?
> 変数dataは標準モジュールのDeclarationsセクションで宣言しております
だとすると、(取りあえずは)問題なさそうですけど・・・
以下3点確認してみてください。
(1)フォーム1又はフォーム2に同名の変数「data」が定義されていませんか?
(2)標準モジュールでの宣言を間違っていませんか?(Privateにしているとか・・・)
(3)フォーム1、フォーム2の両方に、「Option Explicit ステートメント」をつけた場合、エラーになりませんか?
>大吉末吉様
(1)に関しては問題ありませんでした
(3)を試すと変数が宣言されていませんと出ましたので見直してみると、標準モジュールでの宣言をDimで宣言していました。
これをPublicに修正したところ、期待通りの動きとなりました。
結果として(2)のご指摘だったようです
==================================
これで解決とさせていただきます
ささ様、まさやん様もありがとうございました。
ツイート | ![]() |