🚀 go-pugleaf

穐谷（あきや）と申します。

Makoto Miura <miura@ics.co.jp> wrote in article
<01bd273e$b7a8f1c0$e63a18ca@k4miura.ics.co.jp>...
> フォームを２個つくり、片方をツールバーとして使用するプログラムを
> 作成しています。
> ツールバーを最小化すると、もう一つのフォームも同時に最小化する
> ようにできるのでしょうか？

Form_Resizeイベントを使えば、最小化するのを検知できます。


> 開発言語はVisual Basic 4.0 16ビット版です。

VB4.0 16bit版は、トラブルのもとになることが多かったような．．．

------------------------------------------------------
		差出人:	穐谷 三郎
		E-Mail:	akiya@cmpk.or.jp

こんにちは、みうらともうします。

Resありがとうございます！

AKIYA Saburou <akiya@cmpk.or.jp> wrote in article
<6a7843$8jb@rorty.mim.co.jp>...
> 穐谷（あきや）と申します。
> 
> Form_Resizeイベントを使えば、最小化するのを検知できます。

φ(..メモメモ
ありがとうございます。早速やってみますね。

> > 開発言語はVisual Basic 4.0 16ビット版です。
> 
> VB4.0 16bit版は、トラブルのもとになることが多かったような．．．

げげっ、そうだったんですか？？

-- 
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
                         みうらまこと
                 e-mail: miura@ics.co.jp
URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

こんにちは、熊川と申します。

> 
> こんにちは、みうらと申します。
> 
> フォームを２個つくり、片方をツールバーとして使用するプログラムを作成してい
> ます。
> ツールバーを最小化すると、もう一つのフォームも同時に最小化するようにできる
> のでしょうか？
> 
> 開発言語はVisual Basic 4.0 16ビット版です。
> 
> ご存知の方がいらっしゃいましたら、ぜひお教えください。m(__)m
> 
> --
> ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
>                          みうらまこと
>                  e-mail: miura@ics.co.jp
> URL: http://www.edp.eng.tamagawa.ac.jp/~miura/
> ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

要は２つのフォームが連動して、最小化すればいいんですよね。
それでしたら、連動元のForm_Resizeイベントで連動先のWindowstate
プロパティを最小化にしてやればいいのではないでしょうか。

こんな感じですか。
Private Sub Form_Resize
    If Me.WindowState = 1 Then
        Form2.WindowState = 1
    End If
End Sub