Small results of class-type sequence operators in VB. NET

In VB. NET, the type of sequence handler is very different from that of C.

For example:

Protected sub button#click (byvalSenderAs object, byval e as system. eventargs) handles button1.click, button3.click, button4.click
Type: 'category-specific!
'Dim BTN as button = ctype (Me. Controls. Find ("itemnumber", true) (0), button)
Dim BTN as button = ctype (Sender,Button)

If it is C #, you can directly convert it:(Button) sender. commandname

Select case BTN. commandname
Case "animal"
Label3.text = "an animal is a kind of thing in nature"
Case "man"
Label3.text = "Humans are also an animal"
End select

End sub