2013-05-03 58 views
0

我有一个标签数组,我正在使用'Cards_Label(80)',我试图让点击消失。如何使数组的标签消失?

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick 
    For aa As Integer = 0 To 80 
     If MousePosition.X > Cards_Label(aa).Left And MousePosition.Y > Cards_Label(aa).Top Then 
      Cards_Label(aa).Visible = False 
     End If 
    Next 
End Sub 

通过使用这一切,我可以完成的是使整条线消失。感谢您的意见。

+0

由于该位置上的所有卡都符合您的要求(X> Left且Y> Top对于所有这些卡都为真),因此它将删除整行。当您将第一张牌设置为不可见时,您应该退出循环,或者修改您检查位置的方式。 – 2013-05-03 13:10:08

+0

关闭一个....'为aa整数= 0到79' – Steve 2013-05-03 13:10:33

+0

那么,什么是问题?请更具体一些。 – Neolisk 2013-05-03 15:57:07

回答

0

根据您的需要(其要求不明确),您需要检查您是否在卡片坐标中单击。按照当前的逻辑,如果您点击卡右侧或下方的任何地方 - 它会被禁用,所以如果您点击最右下角,所有卡都会被禁用。

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick 
    For aa As Integer = 0 To 80 
     If MousePosition.X > Cards_Label(aa).Left And MousePosition.Y > Cards_Label(aa).Top And MousePosition.X < Cards_Label(aa).Width And MousePosition.Y < Cards_Label(aa).Height Then 
      Cards_Label(aa).Visible = False 
     End If 
    Next 
End Sub