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


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

主题:求助

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


加好友 发短信
等级:童狐 帖子:250 积分:2737 威望:0 精华:0 注册:2014/3/11 12:11:00
求助  发帖心情 Post By:2014/7/31 17:31:00 [只看该作者]

DataColChanged 事件
If  e.DataCol.Name = "数量"  Then
     Dim dr As DataRow = DataTables("配送表").Find ( "配送单ID ='"& e.DataRow("配送单ID").value & "' And 产品 ='"& e.DataRow("产品").value & "' And 客户= '"& e.DataRow("客户").value & "'")
If  dr("配送数量")< 0  Then
        Messagebox.Show("数量不准确,请重新输入数量!","提示") 

        e.DataRow("数量")=0
        e.Cancel = True
    End If
End If

提示 未找到类型string的公共成员 text,代码这样有错吗?


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


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

If  e.DataCol.Name = "数量"  Then
     Dim dr As DataRow = DataTables("配送表").Find ( "配送单ID ='"& e.DataRow("配送单ID") & "' And 产品 ='"& e.DataRow("产品") & "' And 客户= '"& e.DataRow("客户") & "'")
If  dr("配送数量")< 0  Then
        Messagebox.Show("数量不准确,请重新输入数量!","提示") 

        e.DataRow("数量")=0
        e.Cancel = True
    End If
End If


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


加好友 发短信
等级:童狐 帖子:250 积分:2737 威望:0 精华:0 注册:2014/3/11 12:11:00
  发帖心情 Post By:2014/7/31 17:35:00 [只看该作者]

大意了!感谢bin


 回到顶部