В моей программе есть 20 PictureBox, которые меняют свою видимость примерно каждые 5 минут.
Теперь мне нужно подсчитать, сколько PictureBox .visible=true в label1.text.
И сколько .visible=false в label2.text.
Есть идеи, как это сделать автоматически?
Ответ 1 · Sonorpearl
Просто сделайте что-то вроде:
Dim var1 As Integer = 0
Dim var2 As Integer = 0
For Each ctl As Control In Me.Controls
If TypeOf ctl Is PictureBox Then
If ctl.visible
var1+=1
Else
var2+=1
End If
End If
Next
label1.text = var1.ToString
label2.text = var2.ToString