解决这个问题，愿以500分作为酬谢

Question

我建立了一组check控件，用来进行选择性的查询，不知道怎么来获取那些被选中
，请愿意帮我忙的大哥们给我一个信箱地址我把这个界面发送给你帮我解决一下谢了。请把你的信箱留下我把这个截面发送给你！！！！！

Answer 1

挨个判断就行了,还怎么快速~~
If Check1.Value Then MsgBox "被选中了"
[email protected]

Answer 2

这不难啊
给我看看
[email protected]

Answer 3

4个check1,index从0到3，textbox显示check1的状态
Private Sub Check1_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Check1(Index).Value = False Then
Text1.Text = Text1.Text & "check1(" & Index & ")" & "被选中" & vbCrLf
End If
End SubPrivate Sub Check1_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Check1(Index).Value = False Then
Text1.Text = Text1.Text & "check1(" & Index & ")" & "被取消" & vbCrLf
End If
End Sub