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

投稿日: 2006/01/26(Thu) 00:06
投稿者ガッ
Eメール
URL
タイトルRe: サブウインドウを開いて処理を行う。

>  メインウインドウにあるボタン(LABEL)をクリックすると、
LABEL_Click()で、

> 新しくウインドウ(サブウインドウみたいなもの)が開かれ、
Dim f As SubWindow
Set f=New SubWindow
f.Show Owner:=Me

> その新しく表示されたウインドウ上に
> チェックボックスを24個と実行ボタンを設けて、実行ボタンを押すと
実行ボタン_Click()で、

> そのサブウインドウが閉じられて、
Unload Me

> 処理が行われると言った部分
> (処理内容に関しては自分でやります)が
これはメインウィンドウ間でイベントを送信すればいいのかな?

適当に、私が考えた骨組みだけ書いておきます。
・MainForm
 ・Private WithEvents insSubForm As SubForm
 ・LABEL_Click()イベントプロシージャ
  1 LABEL.Enabled=False 'ボタンを二重に利用されないようにする
  2 Set insSubForm=New SubForm
  3 insSubForm.Show Owner:=Me
 ・insSubForm_SubFormEvent(ByVal args As Variant)イベントプロシージャ
  1 実処理をする
  2 Set insSubForm=Nothing

・SubForm
 ・Public Event SubFormEvent(ByVal args As Variant)
 ・Form_Load()イベントプロシージャ
  ・初期化処理
 ・実行ボタン_Click()イベントプロシージャ
  ・RaizeEvent SubFormEvent(<渡したい引数>)
  ・Unload Me

動くかなぁ…

> どうしても分かりません。何か良い方法は無いものでしょうか?
私も良く分からないまま回答していたり…

※デザパタの面白いサイト見つけたので、
 役に立つかは分かりませんがここに載せておきますね
hhttp://www.hyuki.com/dp/cat_index.html


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

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

- VBレスキュー(花ちゃん) - - Web Forum -