| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 怎样控制某字段为必填项 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179375) |
| -- 作者：殷建伟 -- 发布时间：2022/8/20 15:57:00 -- 怎样控制某字段为必填项 怎样设置某字段为必填项，用户不能忽略 |
| -- 作者：有点蓝 -- 发布时间：2022/8/20 16:05:00 -- 1、比如：http://www.foxtable.com/webhelp/topics/0617.htm If e.Col.Name = "折扣" Then \'如果正在输入的是折扣列 If e.Text = "" Then \'如果没有输入内容 e.Cancel = True \'则禁止退出编辑模式 End If End If If e.DataRow.isnull("数量") Then \'判断是否不符合验证要求
MessageBox.Show("数量不能为空","存盘失败",MessageBoxButtons.OK,MessageBoxIcon.Exclamation) \'提示用户 Dim Index As Integer Index = Tables("订单").FindRow(e.DataRow) \'找出此行在销售数据Table中的位置 If Index > -1 Then \'如果找到此行 Tables("订单").Position = Index \'将焦点定位到此行 End If Maintable = Tables("订单") \'选择销售数据表作为主表。 e.Cancel = True \'取消存盘 End If |