投稿日 | : 2003/03/17(Mon) 11:41 |
投稿者 | : ひろぽん |
Eメール | : |
URL | : |
タイトル | : MDIにおける変数の定義方法について |
こんにちは。
今、MDIでアプリを作成してます。
それでSDIで作成していた変数をどうやってMDIに拡張したらいいか分からず悩んでます。
具体的には、節点数を格納する変数があります。SDIでは単純に次のように定義してます。
Dim Node_Num As Integer
これをMDIに拡張する場合は、今のところ、
'変数定義
Dim Window_No As Integer '子フォームカウンタ(子フォームを開くたびに+1)
Dim Node_Num() As Integer '子フォームカウンタを用いた動的配列
…
'子フォーム生成
Window_No = Window_No + 1 'Window_Noの加算
ReDim WorkForm(WindowNo) As New FrmWork '子フォームを生成(子フォームカウンタを用いた配列)
ReDim Preserve Node_Num(WindowNo) As Integer 'Node_Numの動的配列宣言
…
Node_Num(WindoNo) = *** 'Node_Numに節点数を代入
といったコーディングしか思いつきません。
これでは、Node_Numを参照したいときに、どうにかしてアクティブな子フォームからWindow_Noを
取得しなければなりません。
私が理想とするのは、
Me.Node_No
みたいにできるだけ単純にNode_Noを参照できればと考えてますが、何かいい方法はないでしょうか。
(上の参照方法は、子フォームに対するプロパティみたいな形になっているので、これは厳しいかと思いますが・・・)
以上の件、よろしくご教授下さい。お願い致します。