| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]自定义录入界面之三，四限定问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=64797) |
| -- 作者：swagger -- 发布时间：2015/3/2 11:00:00 -- [求助]自定义录入界面之三，四限定问题 在这两个例子里怎样限制只能输入下拉框里面的内容，不能输入以外的内容? |
| -- 作者：Bin -- 发布时间：2015/3/2 11:00:00 -- 把属性里的允许直接输入设置为Flase |
| -- 作者：swagger -- 发布时间：2015/3/2 11:00:00 -- 就是如果输入以外的内容，表格的内容是不会改变的 |
| -- 作者：Bin -- 发布时间：2015/3/2 11:01:00 -- 看2楼 |
| -- 作者：swagger -- 发布时间：2015/3/2 11:57:00 -- 以下是引用Bin在2015/3/2 11:00:00的发言：
把属性里的允许直接输入设置为Flase 不行啊，设置后下拉框就不显示了，而且对于窗口形式的也没效 |
| -- 作者：飞飞 -- 发布时间：2015/3/2 11:59:00 -- 以下是引用Bin在2015/3/2 11:01:00的发言：
看2楼 |
| -- 作者：Bin -- 发布时间：2015/3/2 11:59:00 -- 这个设置和下拉框没有关系.可能你其他地方没弄对,搞不定就上例子. |
| -- 作者：swagger -- 发布时间：2015/3/2 12:01:00 -- 重启项目就可以显示，但是不能输入了啊。我意思是可以输入东西，但是只能选择框里面的东西，如果不在下拉框里面的东西就被cancel掉 |
| -- 作者：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 |
| -- 作者：swagger -- 发布时间：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名搞错了，现在好了 |