主题：关于CheckList未将对象引用设置到对象实例

Dim checkList As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim dr As DataRow
dr = DataTables("员工信息表").Find(" [员工代号] = '"& _UserNo &"' ")
If dr IsNot Nothing Then
    For Index As Integer = 0 To checkList.Items.Count - 1
        checkList.SetItemChecked(Index, True)
    Next
End If

显示未将对象引用设置到对象实例怎么个情况

显示结果是 11 22 未将对象引用设置到对象实例  22 未将对象引用设置到对象实例  循环七次。

checkList.SetItemChecked(Index, True)有问题貌似，但是我又看出不问题来