Foxtable(狐表)用户栏目专家坐堂 → 验证


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

主题:验证

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


加好友 发短信
等级:童狐 帖子:278 积分:2387 威望:0 精华:0 注册:2011/8/18 8:33:00
验证  发帖心情 Post By:2011/8/28 15:14:00 [只看该作者]

一行中包含ABC三列,正确的是只能且必须选填一列,存盘时或者这行编辑完毕时验证代码如何设置


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


加好友 发短信
等级:童狐 帖子:278 积分:2387 威望:0 精华:0 注册:2011/8/18 8:33:00
  发帖心情 Post By:2011/8/28 15:15:00 [只看该作者]

三列均不填或同时填两列以上均错

 


 回到顶部
帅哥,在线噢!
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/29 8:32:00 [只看该作者]

用这个事件:
http://www.foxtable.com/help/topics/0628.htm

 

如果是非逻辑列:

 

Dim dr as datarow = e.datarow

dim cnt as integer

cnt  = iif(dr.isnull("a"),0,1) + iif(dr.isnull("b"),0,1) + iif(dr.isnull("c"),0,1)

if cnt <> 1 then

   e.cancel = true

   messagebox.show("错误")

end if

 

如果是逻辑列:

 

Dim dr as datarow = e.datarow

dim cnt as integer

cnt = iif(dr("a"),1,0)  + iif(dr("b"),1,0)  + iif(dr("c"),1,0)

if cnt <> 1 then

    e.cancel = true

    messagebox.show("错误")

end if


 


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


加好友 发短信
等级:童狐 帖子:278 积分:2387 威望:0 精华:0 注册:2011/8/18 8:33:00
  发帖心情 Post By:2011/8/29 11:28:00 [只看该作者]

我试制行时提示如图-“未命名”

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


加好友 发短信
等级:童狐 帖子:278 积分:2387 威望:0 精华:0 注册:2011/8/18 8:33:00
  发帖心情 Post By:2011/8/29 12:43:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

 回到顶部
美女呀,离线,留言给我吧!
yangming
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2011/8/29 13:00:00 [只看该作者]


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


加好友 发短信
等级:童狐 帖子:278 积分:2387 威望:0 精华:0 注册:2011/8/18 8:33:00
  发帖心情 Post By:2011/8/29 15:56:00 [只看该作者]

具体还是搞不定呀,狐爸帮帮忙


 回到顶部
帅哥,在线噢!
狐狸爸爸
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/29 17:38:00 [只看该作者]

a、b、c三列,只有一列能输入数据:

 

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


 回到顶部