上一个下一个的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 上一个下一个的问题

共有2567人关注过本帖树形打印复制链接主题：上一个下一个的问题

swagger

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：689 积分：5362 威望：0 精华：0 注册：2012/8/25 20:50:00

上一个下一个的问题 发帖心情

Post By：2015/3/26 15:02:00 [显示全部帖子]

订单窗口，设置如果单号为空就不能新增，在表格DataColChanging或者在设置空间=“”也行可以，但是如果点击上一个或下一个订单就失效了，除了在上下一个设置单号不能为空代码，还有没有其他办法避免这个漏洞？

swagger

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：689 积分：5362 威望：0 精华：0 注册：2012/8/25 20:50:00

Post By：2015/3/26 16:53:00 [显示全部帖子]

以下是引用有点甜在2015/3/26 15:05:00的发言：

单号为空不能新增，那你就应该在新增按钮，或者新增事件datarowadding事件，写判断的代码啊

不行啊，譬如

增加一行按钮的代码是：

If Tables("订单").Current("单号") ="" Then
MessageBox.Show("单号不能为空!")
End If

如果单号为空就增加不了

但是按上一个 .Position = .Position - 1 之后，之前的订单的单号是有内容，所以这个时候按新增订单就可以增加了

swagger

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：689 积分：5362 威望：0 精华：0 注册：2012/8/25 20:50:00

Post By：2015/3/26 16:54:00 [显示全部帖子]

放在datarowadding或者beforerow也不行

swagger

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：689 积分：5362 威望：0 精华：0 注册：2012/8/25 20:50:00

Post By：2015/3/26 17:15:00 [显示全部帖子]

以下是引用blsu33在2015/3/26 17:02:00的发言：
单号为空，不允许上下一行的移动；

在上下移动的Button 中加入

If Tables("订单").Current("单号") ="" Then
MessageBox.Show("单号不能为空!")
End If

我在一楼已经说了这个办法，我是问有没有更好的办法，因为这个办法没那么灵活。在datarowadding加了判断代码如

If e.DataRow("会员姓名") = "" Then MessageBox.Show("会员姓名必须输入") ，然后在窗口新增控件用table("表A）.addnew(), 这样子显示"会员姓名必须输入"的窗口，但是表A还是会新增一行，这个代码该怎么写？

主题：上一个下一个的问题