タイトル | : 複数のフォームを出すには? |
記事No | : 210 |
投稿日 | : 2003/06/09(Mon) 23:05 |
投稿者 | : SFI |
はじめまして。聞きたいことがあるのですが、コマンドボタンを押すことによって 同じフォームを複数出すことは出来るのでしょうか?インスタンスを使って Private Sub cmd_NewForm_Click() フォームの新規インスタンスを格納する変数を作成
Dim MyNewForm As Form1 フォームの新規インスタンスを格納する変数を作成 Set My NewForm = New Form1 Form1の新規インスタンスを作成 MyNewForm.Visible = True 新規インスタンスを表示 MyNewForm.Caption = "こんにちは" 新規フォームのCaptionプロパティを"こんに ちは"に設定 End Sub
というかんじでやったのですが実行すると新しいフォームだと不具合が生じます。 何かコレクションで作ったりなど他に同じフォームを複数出す方法はないでしょうか? ご教授お願いします。
|