以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]控件是不是不能使用datarow  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98349)

--  作者:静听枫雨
--  发布时间:2017/3/28 14:33:00
--  [求助]控件是不是不能使用datarow
我想在新增控件 上写个限制 如果 新增了一行,且这一行的某列为空时,不可再新增一行。
我这个代码不能用。报错 

Dim xz As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "客户名称"
        If xz.IsNull("客户名称") Then
            MessageBox.Show("客户名称不能为空")
        Else
            Tables("订单表").AddNew()   
        End If
End Select


--  作者:静听枫雨
--  发布时间:2017/3/28 14:56:00
--  
有老师在吗?
--  作者:有点色
--  发布时间:2017/3/28 15:48:00
--  

If Tables("订单表").Current.IsNull("客户名称") Then

    msgbox("当前行 客户名称 不能为空")

Else

    Tables("订单表").AddNew

End If