Foxtable(狐表)用户栏目专家坐堂 → 求助:关于重置列代码报错,求精简代码,让其运行更高效!


  共有2595人关注过本帖树形打印复制链接

主题:求助:关于重置列代码报错,求精简代码,让其运行更高效!

帅哥哟,离线,有人找我吗?
李孝春
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
求助:关于重置列代码报错,求精简代码,让其运行更高效!  发帖心情 Post By:2015/5/5 10:12:00 [只看该作者]

在窗体关闭前事件中写入如下代码:

 

Dim nms As New List(Of String)
Dim drs As New List(of DataRow)
With DataTables("库存表")
    nms = .GetValues("产品")
    For Each nm As String In nms '找出每个产品的第一行数据, 添加到集合drs中
        drs.Add(.Find("产品 = '" & nm & "'", "[_SortKey]"))
    Next
    For Each dr As DataRow In drs
        .DataCols("入库").RaiseDataColChanged(dr)
    Next
End With

 

窗体运行时候报错如下:

 

.NET Framework 版本:2.0.50727.6419
Foxtable 版本:2014.11.11.1
错误所在事件:窗口,入库管理,Button3,Click
详细错误信息:
未将对象引用设置到对象的实例。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/5/5 10:14:00 [只看该作者]

调试一下看看是那一行代码报错.

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/5 10:17:00 [只看该作者]

 这段代码应该没什么问题,关键你去看一下Datacolchanged事件有什么问题。

 回到顶部