0

嗨,我必须创建一个包含 6 个复选框的组框。当单击多个复选框时,具有较高 int 的复选框。值将显示在标签中。我该怎么做呢?如何针对其他复选框测试 6 个复选框的值并显示选中的最高值?因此,如果选中 checkbox1,它将在标签中显示 1。因此,如果选中了多个复选框,我该如何只显示最高的一个?

4

1 回答 1

3
Dim Chk As CheckBox
Dim i As Integer = 0

For Each Chk In GrpBox.Controls

    If TypeOf (Chk ) Is CheckBox Then
        If Chk .checked Then
            If Chk .Tag > i Then i = Chk .Tag
        End If
    End If
Next
于 2012-10-15T00:15:16.000 回答