Foxtable(狐表)用户栏目专家坐堂 → [求助]自定义录入界面之三,四限定问题


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

主题:[求助]自定义录入界面之三,四限定问题

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
[求助]自定义录入界面之三,四限定问题  发帖心情 Post By:2015/3/2 11:00:00 [只看该作者]

在这两个例子里怎样限制只能输入下拉框里面的内容,不能输入以外的内容?

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


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

把属性里的允许直接输入设置为Flase

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
  发帖心情 Post By:2015/3/2 11:00:00 [只看该作者]

就是如果输入以外的内容,表格的内容是不会改变的

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


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

看2楼

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
  发帖心情 Post By:2015/3/2 11:57:00 [只看该作者]

以下是引用Bin在2015/3/2 11:00:00的发言:
把属性里的允许直接输入设置为Flase

不行啊,设置后下拉框就不显示了,而且对于窗口形式的也没效


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


加好友 发短信
等级:三尾狐 帖子:621 积分:5130 威望:0 精华:1 注册:2014/8/7 6:56:00
  发帖心情 Post By:2015/3/2 11:59:00 [只看该作者]

以下是引用Bin在2015/3/2 11:01:00的发言:
看2楼


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


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

这个设置和下拉框没有关系.可能你其他地方没弄对,搞不定就上例子.

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
  发帖心情 Post By:2015/3/2 12:01:00 [只看该作者]

重启项目就可以显示,但是不能输入了啊。我意思是可以输入东西,但是只能选择框里面的东西,如果不在下拉框里面的东西就被cancel掉


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


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

在DataColChangINg 事件

利用FIND到表查找一下,找到不到数据就执行 e.cancel=true


例如
Dim dr As DataRow
dr = 
DataTables("订单").Find("数量 > 1000","日期 Desc")
If 
dr Is Nothing Then '如果找到的话
    e.cancel=true

End If

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
  发帖心情 Post By:2015/3/2 12:18:00 [只看该作者]

以下是引用Bin在2015/3/2 12:03:00的发言:
在DataColChangINg 事件

利用FIND到表查找一下,找到不到数据就执行 e.cancel=true


例如
Dim dr As DataRow
dr = 
DataTables("订单").Find("数量 > 1000","日期 Desc")
If 
dr Is Nothing Then '如果找到的话
    e.cancel=true

End If

这个只能数字?用getvalue弄好了,http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=63898&page=0&move=next#editform

 

之前是table名搞错了,现在好了


 回到顶部