タイトル : Re: (解決済み)Re^6: フォームのClickイベントをどこでもできないか 投稿日 : 2007/05/25(Fri) 18:25 投稿者 : KG
Private Sub SetEvents(ByVal ctrls As System.Windows.Forms.Control.ControlCollection) For Each ctrl As Control In ctrls If ctrl.HasChildren Then SetEvents(ctrl.Controls) ElseIf ctrl.GetType Is GetType(Button) Then AddHandler ctrl.MouseEnter, AddressOf Buttons_MouseEnter AddHandler ctrl.MouseLeave, AddressOf Buttons_MouseLeave End If Next End Sub 似たような処理をしたことがあるので参考までに。 |