Article View: fj.lang.visualbasic
Article #325Re: ツールボックス作成
From: Sugi
Date: Sun, 29 Mar 1998 00:00
Date: Sun, 29 Mar 1998 00:00
17 lines
1094 bytes
1094 bytes
はじめまして。Sugiです。
これが正しい方法かどうかはわかりませんが、
私は以下のようにやっています。
ツールウィンドウを作成し、名前をForm2とします。
で、親ウィンドウ(Form1)のジェネラルに
Dim frmsub As Form
を定義し、
Form1のロードイベントに
Private Sub Form_Load()
Set frmsub = New Form2
frmsub.Show modeless, Me
End Sub
と記述しています。
この場合Form1を閉じると、Form2も同時に閉じてくれます。
では。
Technical Details
Message-ID:
<6fjina$hn7$1@news.mitene.or.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<6fadpi$ggv$2@mail.wbs.or.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 105c2e,22549105623469d4 X-Google-Attributes: gid105c2e,public From: "Sugi" <sugisita@mtn.co.jp> Subject: Re: ツールボックス作成 Date: 1998/03/29 Message-ID: <6fjina$hn7$1@news.mitene.or.jp> X-Deja-AN: 339031269 Content-Transfer-Encoding: 7bit References: <6fadpi$ggv$2@mail.wbs.or.jp> Content-Type: text/plain; charset="iso-2022-jp" X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3 Organization: Mitene Internet Service Mime-Version: 1.0 Newsgroups: fj.lang.visualbasic