提个初级的但急着要解决的问题！！帮帮忙吧！

[心像]

我想在Form里用代码Laod多个Label，但我想在每个label里都将其的MouseMove事件调用一个函数。我该怎么写呢！？？？？？

[yanlongwuhui]

Private Sub AllLabel_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove, Label2.MouseMove,......
' 函数
End Sub

把所有需要调用那个函数的都写到Handles后面，用“，”分隔

[haifeng39]

addhander label1.mousemove addressof label1_mousemove

[心像]

我的意思是，我在程序设计中有一个Label0 并且定义了其MouseMove事件，我在程序运行后，根据情况生成N个新的Label（比如Label1，Label2,label3……，但这些新生成的个Label的MouseMove事件是空的，我怎么才能让新生成的Label具有Label0的MouseMove事件！

[nmgwolf042]

你在每次新生成Label的时候，顺便为每个新 Lable做自定义时间，然后自定义事件指向的是同一个就OK

[心像]

谢谢 ，我要的是响应鼠标事件，MouseMove事件是不定时的啊

[心像]

对不起看错了，可我在生成新Label的时候怎么给他自定义事件呢？！！？

[雾里看花]

2楼说正解，也给点分给我吧。在这混了好长时间一分还没有。好不容易看到一个会的，还被别人抢先回答了。

[blues_zhao_yang]

把你添加的控件放在一个数组里
然后添加控件以后

        AddHandler label(i).MouseMove, AddressOf label_MouseMove    'i值为数组下标

    Private Sub label_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        '事件
    End Sub

[心像]

谢谢！！！非常感谢，撒分了

[floadcloud]

你在生成Label的代码后面加上 AddHandler lbl.MouseMove, AddressOf lbl_MouseMove
然后添加函数实现
Private Sub lbl_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
'执行
end sub

[yl_521649]

啊哦，来晚了！！不知道还能不能jf了

[心像]

自己Up一下