Foxtable(狐表)用户栏目专家坐堂 → [求助] DataColChanging


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

主题:[求助] DataColChanging

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


加好友 发短信
等级:小狐 帖子:374 积分:3277 威望:0 精华:0 注册:2018/1/12 10:54:00
[求助] DataColChanging  发帖心情 Post By:2018/5/22 10:50:00 [只看该作者]

表的DataColChanging事件代码设置为
Dim hwh2 As DataRow = e.DataRow
If e.DataCol.Name = "货位号" Then
    msgbox(3)
    hwh2 = e.DataTable.Find("货位号 = '" & e.NewValue & "'And 货位号 not In ('77777777', '88888888', '99999999')  ")
    msgbox(2)
    If hwh2("货位号")  IsNot Nothing Then
        MessageBox.Show("此货位号已经存在!")
        If  hwh2("商品编号") =e.DataRow("商品编号") AndAlso hwh2("批号") =e.DataRow("批号")  Then
            MessageBox.Show("此货位号可以使用!")
        Else
            MessageBox.Show("此货位号已经占用!")
            e.Cancel = True
        End If
    End If
End If
测试了下,输入77777777或者88888888或者99999999就弹出错误报告
 .NET Framework 版本:2.0.50727.3655
Foxtable 版本:2018.3.9.1
错误所在事件:表,库存,DataColChanging
详细错误信息:
Exception has been thrown by the target of an invocation.
Object reference not set to an instance of an object.
求教下这个错在哪里了 
[此贴子已经被作者于2018/5/22 10:50:07编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/22 10:54:00 [只看该作者]

If hwh2("货位号")  IsNot Nothing Then

 

改成

 

If hwh2 IsNot Nothing Then


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


加好友 发短信
等级:小狐 帖子:374 积分:3277 威望:0 精华:0 注册:2018/1/12 10:54:00
  发帖心情 Post By:2018/5/22 11:13:00 [只看该作者]

谢谢了


 回到顶部