If Typeof e.Sender Is winform.Button Then For Each c As object In e.Form.Controls If Typeof c Is winform.Button Then If e.Sender.Name = c.Name Then c.FlatStyle = FlatStyle.SYSTEM c.BackColor = Color.YELLOW Else c.VisualStyle = 3 End If End If Next End If