变量不变

Question

我正在使用PowerPoint 2016中的VBA编程。我想要一个变量（Var1）在单击按钮时递增。它应该增加Var2的数量。这是我到目前为止的代码：

Private Sub MyButton_Click()
Var1 = Var1 + Var2
End Sub

但是，当我将MsgBox(Var1)添加到sub的末尾时，它将在应用增量之前显示变量的值。

所有变量都在模块的顶部声明，如下所示：Public [VariableName] As Integer。 Var2的值在上一张幻灯片中设置如下：

Private Sub MyOtherButton_Click()
If 'number is in my specified range then
    Var2 = MyTextBox.Value
Else
    MsgBox("Enter a value between min and max")
End If

为什么会发生这种情况，我该怎么做才能解决它？

Answer 1

我注意到我只是认为变量被正确声明了。我必须在模块中声明它们，而不是＆＃34; Slide＃＆＃34;的代码。对象