From間のデータ受け渡しについて（VB6)

質問

VB6初心者です。

たとえば、From1とFrom2があり

Form1からFrom2を表示

Form２でTEXT（”ABC")を入力
From2を閉じ

Form1でForm2で入力したTEXT（”ABC")
を受け撮りたいのですが。

どうすればいいですか？

現在、Form1からForm2は
　Form1内から
　　Form2.Show
　　で表示しています。

よろしくお願いします。

回答No.2

emsuja · ベストアンサー

基本的な考え方は ＃１ の方の回答でいいかと思いますが
複数の Form 間で編集を共有する場合は通常は 標準モジュールを追加して
その頭に

Option Explicit

Global a As Variant ← 変数タイプは本当に必要なものにしたほうがベター

としてパブリック変数を使ったほうが後々プログラムの拡張をする時に楽だと思います

変数 a にデータを渡すタイミングは

Form2 上の

Form_Unload
Text1_Change
Text1_LostFocus
Text1_Validate

等 任意のタイミングで渡せますが、これはプログラムの作成の都合（入力データの妥当性チェック等）で決めます。

＃１の方の回答のサンプルの
Form1 から
Public a As Variant の行を削除し

上に書いた 標準モジュールを追加すれば動作します

回答No.1

n-jun

自信はありませんが。。。

フォーム１にCommandButtonを２個
フォーム２にTextBoxを１個

フォーム１に

Option Explicit

Public a As Variant

Private Sub Command1_Click()
Form2.Show
End Sub

Private Sub Command2_Click()
MsgBox a
End Sub

フォーム２に

Private Sub Form_Unload(Cancel As Integer)
Form1.a = Text1.Text
End Sub

でメッセージボックスに値を表示出来ました。
⇒あくまでも自信はありません。

お礼

ありがとうございます。
試してみます。助かります。