0

我有一个复选框,它的项目来自我的数据库(tbl_Section),所以它加载了所有的节号(主键)。我有 5 个节号,其中 3 个将分配给一位老师。我正在考虑使用 While 语句,但我不知道如何。

为了让你更简单,这就是我需要做的:

While //index(number) is checked
      //do something
Else (i know it should not be ELSE, but i dont know what keyword is to be used)
      //do something
End While

非常感谢!

4

1 回答 1

3

您要做的是遍历复选框中的每个项目。对于每个项目,您检查是否已检查,然后采取相应措施:

'We will run through each indice
For i = 0 To CheckedListBox1.Items.Count - 1
    'You can replace As Object by your object type
    'ex : Dim Item As String = CType(CheckedListBox1.Items(i), String)
    Dim Item As Object = CheckedListBox1.Items(i)

    'We ask if this item is checked or not
    If CheckedListBox1.GetItemChecked(i) Then
        'Do something if Item is checked
    Else
        'Do something else if Item is not checked
    End If
Next
于 2016-11-02T13:35:04.533 回答