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

投稿日: 2005/04/18(Mon) 18:34
投稿者ガッ
Eメール
URL
タイトルRe: メニューリストの追加

> タスクトレイや右クリックでメニューを表示させるため、
> メニューエディタを使ってリストを作成し、表示させています。
> このメニューにプログラムからリストを追加することは可能でしょうか?
> (例えば、テキストボックスに入力した内容を追加するとか。)
> 知っている方がいましたら教えてください。
VB6辺りなら、
メニューにインデックス振って、Loadステートメントでロードできます。

'Form1.frm
Option Explicit

'メニューエディタで
'   ・Name="Menu1"
'   ・Index=0
'というメニューを作る
Private Sub Form_Click()
    Static i As Long
    Load Menu1(Menu1.UBound + 1)
    With Menu1(Menu1.UBound)
        .Caption = CStr(i)
        .Visible = True
    End With
    i = i + 1
End Sub

※まぁ、メニューを動的にロードしているだけですね(orz


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

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

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