以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于CheckList未将对象引用设置到对象实例  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68895)

--  作者:sara
--  发布时间:2015/5/27 9:43:00
--  关于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

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


--  作者:Bin
--  发布时间:2015/5/27 9:44:00
--  
调试一下看看.
[此贴子已经被作者于2015/5/27 9:43:45编辑过]

--  作者:Bin
--  发布时间:2015/5/27 9:44:00
--  

建议您用这个方法:
http://www.foxtable.com/help/topics/1485.htm

先找出是哪一行出错,然后分析原因,搞不定,可以在论坛发帖,贴出代码,并告诉我们运行到哪一行出错,以及错误提示。

--  作者:sara
--  发布时间:2015/5/27 9:48:00
--  

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

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


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/5/27 9:50:00
--  

 

[此贴子已经被作者于2015/5/27 9:51:17编辑过]

--  作者:大红袍
--  发布时间:2015/5/27 9:54:00
--  
 呃,代码真没看出什么问题,应该有其它问题影响。做个例子上来。
--  作者:狐狸爸爸
--  发布时间:2015/5/27 9:55:00
--  

这个代码不应该有错误提示,出现这个提示框之前,没有其他提示?

楼主自己也敷衍,既然调试,就应该告知别人: 显示了哪个Messgebox后出错。

如果没有显示messagebox,那么就应该将MessageBox的位置往前移动,直到能准确定位错误代码。

[此贴子已经被作者于2015/5/27 9:56:28编辑过]

--  作者:Bin
--  发布时间:2015/5/27 9:58:00
--  
是不是ItemCheck 事件代码有问题?  具体请上个例子看看
--  作者:大红袍
--  发布时间:2015/5/27 9:59:00
--  

 测试了一下,这段代码本来就有问题,或造成死循环

 

For Index As Integer = 0 To checkList.Items.Count - 1
    checkList.SetItemChecked(Index, True)
Next

 

 再有,你肯定在其它事件还写了代码。