Access实例

防止打开一个报告，如果没有数据显示

2009年5月20日（星期三），

我们可以防止公开的一份报​​告，如果没有数据显示，为此，我们根据版本的Access使用两种形式：

1 - 所有版本的Access
下面的代码将在该报告的属性，事件“扶持”

使用事件使能（激活）报告：

私人小组Report_Activate（）

如果DCOUNT（“*”，Me.RecordSource）= 0

MSGBOX“没有任何记录显示”vbDefaultButton1，“错误！”

AcReport DoCmd.Close，“报告名称”

结束如果

END SUB

2 - 从版本7（Access 95中），添加的事件，如果没有数据，那么我们可以urilizar下面的代码：

私人小组Report_NoData将作为整数（取消）

MSGBOX“报告中的任何数据。”，VbInformation，“错误！”

取消= TRUE

END SUB

看到运行下载的例子： 防止开题报告

在发表于未分类 | 13评论»

如何防止开放的形式，如果没有记录显示？

2009年5月2日，星期六，

有时是必要的，以防止开放的形式，如果有记录显示，例如，做一个查询时，并没有登记并不需要，我们并不需要以开放的形式，因为我们没有数据显示。 所以我们要检查是否有记录显示，如果没有显示一条消息，阻碍开放的形式。 怎么样？

这很容易在事件的形式属性只是把下面的代码“，打开”：

= 0 Then如果Form.RecordsetClone.RecordCount
MSGBOX“没有找到记录。”，VbExclamation，“错误！”
DoCmd.Close acForm，“找到数据”
退出小组
结束如果

看一个例子下载： 防止开放

张贴范例 ， 表格 ， 模块 | 2评论»