tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^3: 透過したラベルのイベントをとりたい
投稿日: 2012/05/17(Thu) 14:18
投稿者shu
Label1〜40の上に配置してあるであろうラベルはイベントの取得以外に
意味があるのでしょうか?なければそんなラベルは配置せずに
Label1〜40にイベントを貼るようにした方がよいと思います。

例)
private labels() as Label
・・・
labels = new Label() {Label1, Label2, Label3, ... , Label40}

For Each lbl as Label in labels
    AddHandler lbl.MouseMove, AddressOf lbl_MouseMove
Next
・・・


Private Sub lbl_MouseMove(sender,e)    '<--実際にはAs型を書いて下さい。
    For Each lbl2 as Label in labels
        If lbl2 is sender then
        lbl2.BackColor = ・・・
        Else
        lbl2.BackColor = ・・・
        End If
    Next
End Sub

といった感じ。必要に応じ他のMouseイベントもAddHandlerするとよいと思います。

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

古いスレッドにレスはつけられません。