Visual studio 2012 如果visual studio中的颜色为红色，则尝试隐藏按钮上的标签

这将只适用于标签发送器，但我也需要将其用于按钮发送器，以便仅当单击按钮时，它可以隐藏标签是否为红色。 我有48个座位 私有子标签\u ClickByVal sender As System.Object，ByVal e As System.EventArgs处理Seat9.Click，Seat8.Click，Seat5.Click，Seat48.Click，Seat47.Click，Seat46.Click，Seat45.Click，Seat44.Click，Seat43.Click，Seat42.Click，Seat41.Click，Seat40.Click，Seat4.Click，seat49.Click，Seat38.Click，Seat37.Click，Seat36.Click，座位35.点击，座位34.点击，座位33.点击，座位32.点击，座位31.点击，座位30.点击，座位39.点击，座位28.点击，座位27.点击，座位26.点击，座位25.点击，座位24.点击，座位23.点击，座位22.点击，座位21.点击，座位20.点击，座位18.点击，座位17.点击，座位16.点击，座位15.点击，座位14.点击，座位13.点击，座位12.点击，座位11.点击，座位10.点击，座位1.点击

Dim Seats As Label = CType(sender, Label)

    If Seats.BackColor = Color.White Then

        Seats.BackColor = Color.Red

    Else

        Seats.BackColor = Color.White

    End If

---

好吧，我想我现在明白了。 您有多个代表座位的标签，当用户单击标签时，标签会从白色变为红色。 您希望创建一个按钮，一旦单击，它将从屏幕/窗体中删除所有红色标签。 假设表单名为frmMain，则可以将以下内容放置在按钮的单击事件中

---

我没有拉上VS，所以语法可能有点不正确，但我想你明白了。

你是否为特定标签捕获此事件？你能不能不使用标签名而不转换发件人？我很难理解你的逻辑。如果标签背景为红色，则按钮在单击时应消失？如果你能解释一下你想要达到的目标，也许我们可以开发一个不同的解决方案。

For Each c As Control in frmMain.Controls
 Dim l As Label = DirectCast(c, Label) ' Cast from control to label
 If Not l Is Nothing ' If this control is indeed a label then process
   If l.BackColor = Color.Red Then ' If color is red then hide label
     l.Visible = False
   Else
    l.Visible = True
   End If
  l.Visible = False
 End If
Next