以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  增加字段必填项属性  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=51499)

--  作者:9EQ98
--  发布时间:2014/5/27 17:24:00
--  增加字段必填项属性

必填项的通用代码,修改:Required() 数组值为必填项字段名称(红色部分),然后将以下代码加入表属性的 BeforeSaveDataRow 事件(红色部分)

 

\' BeforeSaveDataRow (表属性的 BeforeSaveDataRow 事件)
\' 在保存某一数据行之前执行,可以在此对数据进行最终的验证.
\' 必填项的检查 Top
Dim Required() As String = {"模板编号", "模板分类", "模板名称", "球号名称"}  \'必填项的字段名称
Dim ColText As String = ""
For I As Integer = 0 To Required.Length - 1
    If e.DataRow.IsNull(Required(I)) Then
        ColText = IIF(e.DataTable.DataCols(Required(I)).Caption = "",Required(I),e.DataTable.DataCols(Required(I)).Caption)
        MessageBox.Show("【" & ColText & "】不能为空","提示",MessageBoxButtons.OK,MessageBoxIcon.Warning)
        E.Cancel = True
        Return
    End If
Next
\' 必填项的检查 End

 

建议狐狸爸爸:

考虑增加必填项字段属性,为True时,由系统自动检测,自动提示。


--  作者:有点甜
--  发布时间:2014/5/27 17:32:00
--  
 顶......
--  作者:菲舍尔
--  发布时间:2014/5/27 23:41:00
--  

列的不可为空属性,不是可以达到要求吗?


--  作者:9EQ98
--  发布时间:2014/5/30 8:01:00
--  

请问列不可为空的属性,在哪里设置?


--  作者:Bin
--  发布时间:2014/5/30 8:27:00
--  
目前都是需要使用代码来判断实现.
BeforeSaveDataRow 判断一下该列是否为空.

建议不错.

--  作者:lihe60
--  发布时间:2014/5/30 8:51:00
--  
以下是引用Bin在2014-5-30 8:27:00的发言:
目前都是需要使用代码来判断实现.
BeforeSaveDataRow 判断一下该列是否为空.

建议不错.

有这个属性吗?


--  作者:Bin
--  发布时间:2014/5/30 8:55:00
--  
目前没有,有的话何须用代码判断.