FORM1の値を参照する場合について

質問

質問します。
FORM1を作成し、そこにTextbox1に値を何か入れた場合に、その値をチェック関数を新しいクラス(check.vb)にてチェックする場合にどのようにFORM1のTextbox1の値を参照すればよろしいのでしょうか？
public function Check() AS Boolean
Dim FORM AS NEW FORM1
Msgbox(FORM.Textbox1.text)
end function
上記のようなチェック処理をしても空が表示されてしまいます。何方かご教授お願い致します。

回答No.2

ki-ton · ベストアンサー

テキストボックスをオブジェクトとして
Checkファンクションに
渡せばいいのではないですか？

public function Check(objTar as object) AS Boolean
Msgbox(objTar.text)
end function

お礼

教えて頂いた通り、引数として参照渡しを行うようにしました。ありがとうございました。

回答No.3

BLUEPIXY

>Dim FORM AS FORM1
いや、あの、だからね、
AS FORM1っていうのは、型だから、
実際の表示されてるForm1のTextbox1に値を設定されているものを捕まえないといけないでしょう？
Set FORM = とかして
例えば、
プログラムの他のところで
Dim x as integer
x=100
とかされているとして、
別のプロシジャーで
public function Check()
Dim x as integer
debug.print x
end function
として、x は、Check()の中で、100という値になると思う？

回答No.1

BLUEPIXY

NEWしたものっていうのは、その場のものだから
Form1を直接捕まえるか
Textbox1のイベントで自分自身を引数にCheckを呼び出すようにしたらどうでしょう

補足

New宣言せず普通？の宣言をすればよろしいのでしょうか？
Dim FORM AS FORM1
Msgbox(FORM.Textbox1.text)