tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトル動的に追加したコントロールを削除
記事No9073
投稿日: 2009/06/11(Thu) 13:22
投稿者VB
VB2008
WinXP
-----------------------------------------------------------------------------------
    Private Sub SplitContainer1_Panel1_MouseUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles SplitContainer1.Panel1.MouseUp
        On Error Resume Next
        Dim NewLabel As New Label()
        'ラベル追加
        If e.Button = Windows.Forms.MouseButtons.Left Then
            NewLabel.Name = "Label" + CStr(StCnt + 1)                                      
            NewLabel.Location = New Point(e.X, e.Y)                                  
            NewLabel.Size = New Size(100, 28)                                        
            NewLabel.Font = New Font(NewLabel.Font.FontFamily, 12, FontStyle.Regular)  
           NewLabel.Visible = True                                              
            SplitContainer1.Panel1.Controls.Add(NewLabel)
            StCnt += 1
        End If
        'ラベル削除
        If e.Button = Windows.Forms.MouseButtons.Right Then
            SplitContainer1.Panel1.Controls.RemoveAt(0)
        End If
    End Sub
-----------------------------------------------------------------------------------

作ったラベルを指定したものだけを消すには、
RemoveAt(index as integer)
↑選択したラベルのIndexを指定しなければならないということですが
Indexとは、TabIndexのことでしょうか?(^^;
どうすれば、指定したものだけを任意の順番で消していくことが出来るでしょうか?

それが分かれば動的に作ったコントロールの編集(サイズの変更など)は、
分かるような気がするので。

どうぞアドバイスよろしくお願いいたします。

[ツリー表示へ]
タイトルRe: 動的に追加したコントロールを削除
記事No9074
投稿日: 2009/06/11(Thu) 15:11
投稿者VB
http://cyberm.hp.infoseek.co.jp/Topics/Arrangement/index.html
↑こちらを参考に作ってみようと思います。
また、作っていくうえで分からないことがあれば随時質問させていただきます。
よろしくお願い致します。

[ツリー表示へ]
タイトル動的に追加したコントロールに右クリック
記事No9076
投稿日: 2009/06/11(Thu) 16:30
投稿者VB
NewLabel(1).ContextMenuStrip.Name ="ContextMenuStrip1"    '右クリック
ラベルを作る際に、コントロールを右クリックした際に
ポップアップメニューを表示させるため
上記のようにContextMenuStrip.Nameを指定したのですが
実際に右クリックしても
メニューが表示されません。
何が足りないでしょうか?

[ツリー表示へ]
タイトルRe: 動的に追加したコントロールに右クリック
記事No9078
投稿日: 2009/06/11(Thu) 16:57
投稿者花ちゃん
> 何が足りないでしょうか?

調べて試す努力が足りないのでは?

ツールバー - VB 09/05/25-11:05 No.13696
これも
ドラッグ&ドロップ - VB 09/06/10-13:43 No.9063 New
これも、貴方が質問したものですよね、レスを貰ったら必ず、返事や解決報告を
して下さい。

[ツリー表示へ]
タイトルRe^2: 動的に追加したコントロールに右クリック
記事No9079
投稿日: 2009/06/11(Thu) 17:28
投稿者VB
> 調べて試す努力が足りないのでは?
了解しました。
調べなおします。

> ツールバー - VB 09/05/25-11:05 No.13696
こちらは、返事を今してまいりました。

> ドラッグ&ドロップ - VB 09/06/10-13:43 No.9063 New
こちらは、現在試行錯誤中です。

[ツリー表示へ]
タイトルRe^3: 動的に追加したコントロールに右クリック
記事No9080
投稿日: 2009/06/11(Thu) 17:35
投稿者VB
            NewLabel(1).ContextMenuStrip = New ContextMenuStrip
            NewLabel(1).ContextMenuStrip = ContextMenuStrip1 '右クリック

上記のように書きましたら出来ました。

[ツリー表示へ]