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

投稿日: 2007/03/12(Mon) 11:03
投稿者ムキア
Eメール
URL
タイトルRe^2: ユーザコントロールを動的に作成

> > メイン画面に全てのユーザコントロールを貼り付けユーザコントロールのVisibleをFalse。
> > 押下されたボタンに従いVisibleをTrue。
> > bUtton1 = UserControl1表示 bUtton2 = UserControl2表示
> > としていたのですが、どうしても起動時に時間がかかってしまいます。
>
> ロジックや画面構成を見直した後でも時間がかかるとしたら、それは仕方が無いことで。
> 逃げ手は「暇なときにロードする」例えば起動時にすべてのユーザコントロールをVisibleをFalse
> でロードしておきます。

起動時に全てのユーザコントロールをロードすると数分かかってしまいます。
その中にはユーザーによっては不要なユーザコントロールもある為、
ボタン押下時に必要なユーザコントロールを作成する手法を考えております。

Private Sub btnAdd_Click()
Set extObj = Controls.Add("VB.CommandButton", "btnNew")
With Controls("btnNew")
.Caption = "NEWボタン"
.Width = 1000
.Height = 500
.Visible = True
End With
End Sub
みたく、ボタンをユーザコントロールにしたいのですが、どうすれば良いのかと。

言葉が足らず申し訳ありませんでした。
よろしくお願いします。


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

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

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