Office中国论坛/Access中国论坛

标题: 关于提示框的问题 [打印本页]

作者: erin_lyj 时间: 2006-10-31 01:05
标题: 关于提示框的问题
有一查询表，名字为a，

想实现如下功能：

判断该查询表是否为空，若为空则出现提示框，说明此表为空，若表不为空，则将此查询结果导出txt为文件，代码我是这么写的，可是不对，如何更改呢？

If IsNull(a) Then
msg = "no record"
reSponse = MsgBox(msg, Style)
End If
DoCmd.TransferText acExportDelim, "a导出规格", "a", "D:\a.txt"

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)