VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 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を参照できればと考えてますが、何かいい方法はないでしょうか。
(上の参照方法は、子フォームに対するプロパティみたいな形になっているので、これは厳しいかと思いますが・・・)

以上の件、よろしくご教授下さい。お願い致します。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -