>>499
Private Sub ガッ(byval sender As Object, byval e As EventArgs) Handles ＞＞499.ぬるぽ
　　　　Dim orz As Nanasi = DirectCast(sender, Nanasi)
　　　　Call Sendガッ(orz)
End Sub
みたいな時にHandlesの後を見れば
何のイベントプロシージャか分かるのはエレガントだと思うぬ。