Foxtable(狐表)用户栏目专家坐堂 → 空值问题3


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

主题:空值问题3

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


加好友 发短信
等级:婴狐 帖子:72 积分:557 威望:0 精华:0 注册:2015/1/25 16:21:00
空值问题3  发帖心情 Post By:2015/2/2 12:47:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:例子.table

afteredit中有如下代码

If e.Col.name = "编号"
    If e.Row("编号") = Nothing
        MessageBox.show("对不起,编号内容禁止为空!")
        e.Cancel = True
    End If
End If

问题表上直接输入有用,但是窗体上录入不起作用,请问如何设置?


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


加好友 发短信
等级:婴狐 帖子:72 积分:557 威望:0 精华:0 注册:2015/1/25 16:21:00
  发帖心情 Post By:2015/2/2 13:00:00 [只看该作者]

窗口录入时不提示


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


加好友 发短信
等级:五尾狐 帖子:1100 积分:8985 威望:0 精华:0 注册:2014/3/15 14:36:00
  发帖心情 Post By:2015/2/2 13:14:00 [只看该作者]

ValidateEdit事件 If e.Col.Name = "编号" Then '如果正在输入的是折扣列 If e.Text > "" Then '如果已经输入内容 Else e.Cancel = True '则禁止退出编辑模式 End If End If
[此贴子已经被作者于2015-2-2 13:16:00编辑过]

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


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

参考帮助,利用DataColChangIng事件 http://www.foxtable.com/help/topics/0624.htm

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


加好友 发短信
等级:婴狐 帖子:72 积分:557 威望:0 精华:0 注册:2015/1/25 16:21:00
  发帖心情 Post By:2015/2/2 15:05:00 [只看该作者]

窗口录入中还是不起作用,咋办


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


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

以下是引用阿依肯在2015-2-2 15:05:00的发言:

窗口录入中还是不起作用,咋办

 

DataColChangIng

 

If e.DataCol.name = "编号"
    If e.NewValue = Nothing Then
        MessageBox.show("对不起,编号内容禁止为空!")
        e.Cancel = True
    End If
End If

 

 


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


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

或者,在窗口控件Validating事件

 

If e.Sender.Text = Nothing Then
    MessageBox.show("对不起,编号内容禁止为空!")
    e.Cancel = True
End If


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


加好友 发短信
等级:婴狐 帖子:72 积分:557 威望:0 精华:0 注册:2015/1/25 16:21:00
  发帖心情 Post By:2015/2/2 15:36:00 [只看该作者]

If e.Sender.Text = Nothing Then
MessageBox.show("对不起,编号内容禁止为空!")
e.Cancel = True
End If

 

这样针对窗体的所有控件,指定某一控件该代码怎么改?


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


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

1.用DataColChangIng事件的方案更加好.
2.判断TExt 应该用 = ""
3.指定控件名即可

if e.form.controls("控件名").text = ""  then

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


加好友 发短信
等级:婴狐 帖子:72 积分:557 威望:0 精华:0 注册:2015/1/25 16:21:00
  发帖心情 Post By:2015/2/2 16:03:00 [只看该作者]

请看看这个例子,我想要的是在窗体上录入数据时某一列不为空

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:例子.table


 回到顶部
总数 16 1 2 下一页