Private Sub Check1_Click()
If Check2.Value = 1 Then Check2.Value = 0
If Check3.Value = 1 Then Check3.Value = 0
If Check4.Value = 1 Then Check4.Value = 0
If Check5.Value = 1 Then Check5.Value = 0
If Check1.Value = 1 Then Text1.Text = Check1.Caption
If Check1.Value = 0 Then Text1.Text = ""
End Sub
I want to do the same with control Array :
My Code :
If Check1(Index) Then
Text1.Text = Check1(Index).Caption
Else
For k = 0 To Check1.Count
Text1.Text = ""
Check1(i).Value = 0
Next
End If
But I can not get the same result with this code. Plz help.