🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.visualbasic
Article #325

Re: ツールボックス作成

#325
From: Sugi
Date: Sun, 29 Mar 1998 00:00
17 lines
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-mail
References: <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