我想要把用一个checklistbox里面的选项限制另外一个checklistbox可以选多少个,然后再将选到的文本显示在listbox中,但我不知道该怎样做呀!!!!!!
这是我写的Code
Private Sub cbSizeOfBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbSizeOfBox.SelectedIndexChanged
Dim Q As Integer
Q = Q + clbExtreSelect.CheckedItems.Count
If cbSizeOfBox.Text = "Small £ 6.95" And Q > 1 Then
For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
clbExtreSelect.SetItemChecked(Q, False)
Next
MessageBox.Show("You can choose only up to 1 item")
End If
If cbSizeOfBox.Text = " Medium £ 11.95" And Q > 3 Then
For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
clbExtreSelect.SetItemChecked(Q, False)
Next
MessageBox.Show("You can choose only up to 3 item")
End If
If cbSizeOfBox.Text = "Large £ 15.95 " And Q > 8 Then
For Q = 0 To clbExtreSelect.CheckedItems.Count - 1
clbExtreSelect.SetItemChecked(Q, False)
Next
MessageBox.Show("You can choose only up to 6 item")
End If
If BoxChosen = False Then
lstList.Items.Add(cbSizeOfBox.SelectedItem)
BoxChosen = True
End If
End Sub
求大神指导啊!