更改查询时 MS Access 溢出

Question

好的，我已经在 MS Access 2007 中构建了报告，每个报告都运行多个（40 多个）查询。查询正在打开表、子查询等，我不认为 Access 正在关闭它们。我可能是错的，但出于某种原因，我认为这是导致溢出的原因。

但无论如何，我试图弄清楚为什么会突然发生这种情况，以及我能做些什么来解决它。当我只有一个模式和一些虚拟数据时，报告工作得很好，但是当数据库实际填充时，为我们提供数据的个人创建了更多的查找表，所以现在使用 3 个表的典型查询是使用 5。

您认为查找表的增加（因此 Access 打开更多对象）是我收到溢出错误的原因，还是可能是其他原因？另外，我不懂VBA，那么是否有任何值得追求的简单解决方案（例如分解报告，这需要一段时间）？

谢谢

Answer 1

确保您真正了解自己的“溢出”状况。此代码在立即窗口中显示“错误 6（溢出）”（不带引号）。

    Dim i As Integer
    Dim strMsg As String

On Error GoTo ErrorHandler

    i = 32767
    i = i + 1

ExitHere:
    On Error GoTo 0
    Exit Sub

ErrorHandler:
    strMsg = "Error " & Err.Number & " (" & Err.description _
        & ")"
    Debug.Print strMsg
    GoTo ExitHere

该错误的解释是 32,767 是 VBA Integer 可以接受的最大值。因此，尝试加 1 会得到 32,768，这比整数所能容纳的要大……所以会溢出。

其他数字数据类型也有限制。例如，2147483647 是可以存储为 VBA Long 的最大值。

我在这里可能完全没有根据，但我会检查您的复杂报告是否包括排序和分组选项，您可能会在其中生成总计。如果是这样，您添加的数据是否使这些总计的值超出了各自数据类型的容量。

如果您收到包含“溢出”一词的其他错误消息，则告诉我们错误消息的确切文本可能会有所帮助。