运行总VBA

我有下面的代码来计算下面的例子

|1 2 2|

|2 5 7|

等等，问题是当我在不关闭访问权限的情况下多次运行vba时，它给出了下面的示例

|1 2 9|

|2 5 14|

我只是继续补充。如何修复此问题，以便每次都重新开始，而不关闭访问并重新打开它

代码：

---

序言：假设你给了彼得5个苹果，其中一个是彼得自己吃的，另一个是和他妹妹安妮分享的。彼得还剩下多少个苹果

如果你的答案是3，那么你就错了，因为你不知道彼得在你给他另外5个苹果之前有多少个苹果

安布尔来了：

GBL_Sum = 0

---

无论何时何地使用它，无论何时开始求和。

不要使用

Global

access修饰符，它已被弃用。改用

Public

。我不确定我是否遵守了。。。第三个值只是前两个值的和吗？我想不是，只是希望问题背后有更多的背景。这是一个运行求和，9+5=14Mat，谢谢你提供的信息，但是这不起作用。公共函数Init_Globals（）GBL_sum=0 End Function公共函数global_add（ivalue）作为Double GBL_Sum=GBL_Sum+ivalue global_add=GBL_Sum End function，我对GBL_Sum使用了上述方法，但它仍在继续添加。您将其添加到单独的函数中，但必须从一开始就调用它。如果计算是从单击某个按钮开始的，则应在相应的OnClick（或clicked）事件中将该变量置零。不幸的是，它们没有。它是查询条件中的vba，由多个生成表的宏和在凌晨4点运行的批处理触发。

GBL_Sum = 0