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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教关于doubleclick的问题，谢谢

共有5077人关注过本帖树形打印复制链接主题：请教关于doubleclick的问题，谢谢

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/4/10 20:48:00 [显示全部帖子]

使用前，判断一下表是否为空

If Tables("订单主表.客户表").current IsNot Nothing AndAlso e.Table.current IsNot Nothing Then
Tables("订单主表.客户表").current("客户名称")= e.Table.current("客户名称")
Forms("添加订购单位").close
End If

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/4/10 23:38:00 [显示全部帖子]

以下是引用qq864729713在2014-4-10 23:22:00的发言：
按照你的方法，错误时没了，但是双击的时候没反应？

双击的时候，没有反应，是因为没有数据，没有数据就把窗口关了吧。

If Tables("订单主表.客户表").current IsNot Nothing AndAlso e.Table.current IsNot Nothing Then
Tables("订单主表.客户表").current("客户名称")= e.Table.current("客户名称")

End If

Forms("添加订购单位").close

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/4/10 23:53:00 [显示全部帖子]

以下是引用qq864729713在2014-4-10 23:46:00的发言：
再重新试了一下，反应是有了，但是就是空白，不显示东西

你把例子上传上来吧。

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/4/11 8:53:00 [显示全部帖子]

以下是引用qq864729713在2014-4-11 0:19:00的发言：
是的，经过指导，没这种情况了，不过不显示任何东西，空白了，

你的表名搞错了。

If Tables("订单主表").current IsNot Nothing AndAlso e.Table.current IsNot Nothing Then
Tables("订单主表").current("订购单位")= e.Table.current("客户名称")
End If
Forms("添加订购单位").close