[求助]同样的代码不同的表，存在执行差 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]同样的代码不同的表，存在执行差

共有5460人关注过本帖树形打印复制链接主题：[求助]同样的代码不同的表，存在执行差

blackzhu

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

等级：狐仙帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2015/8/10 9:26:00 [显示全部帖子]

e.Cancel = True 不是直接关闭了吗?

BeforeOpenProject

在打开项目之前执行，可以在此进行一些环境上的判断，决定是否打开项目。

e参数属性：

File：字符型，表示正在打开的项目文件名称，含路径。
Cancel: 逻辑型，设为True，拒绝打开项目。
HideSplashForm：逻辑型，设为True，关闭Foxtable的启动封面。

[此贴子已经被作者于2015/8/10 9:25:56编辑过]

blackzhu

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

等级：狐仙帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2015/8/10 10:01:00 [显示全部帖子]

老大在这个事件中 e.Cancel 设置为TRue 是拒绝打开项目

blackzhu

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

等级：狐仙帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2015/8/10 12:22:00 [显示全部帖子]

是我看错了是关闭事件不是打开事件

If DataTables("订单").Find("[发生日期] Is Null and [产品] Is Null and [客户] Is Null") Is Nothing Then 找这几个列同时有无空值,如果没有

Return '那么返回,不再执行代码

End If

你把 Return 改成 e.Cancel = true 试试

[此贴子已经被作者于2015/8/10 12:26:28编辑过]

blackzhu

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

等级：狐仙帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2015/8/11 9:19:00 [显示全部帖子]

你用and 是需要三个列同时是空值才判断不然不判断的呀

另外你是 is nothing 是没有找到呀!

主题：[求助]同样的代码不同的表，存在执行差