选择了复选框列表的“索引超出范围”

Question

如何解决此错误？如果在复选框列表CBLAdd中选择了第一项，则不会发生此错误。如果选择了第二个，第三个等等（并且没有选择第一个），则会出现错误。

  

System.ArgumentOutOfRangeException：'索引超出范围。一定是   非负数且小于集合的大小。参数名称：   索引”

发生在以下代码的If CBLAdd.Items(i).Selected Then行：

Protected Sub BtnAdd_Click(sender As Object, e As EventArgs) Handles BtnAdd.Click
    If CBLAdd.SelectedIndex >= 0 Then
        For i As Integer = 0 To CBLAdd.Items.Count - 1
            If CBLAdd.Items(i).Selected Then
                'Code removed from here - irrelevant to my question
            End If
        Next
    End If
End Sub