菜鸟求助，关于VB6.0的问题

来源：百度知道 编辑：UC知道 时间：2024/07/02 02:51:13
比如我在command1中输入a=10
再在command2中输入
a=a-1
print a
运行后先按按钮1，再按按钮2，结果是-1.
有没办法让结果是9啊？
就是说按钮之间的赋值可以互通

在所有代码的最上面写上Dim a as Integer

Dim a As Integer
Private Sub Command1_Click()
a = Val(InputBox("输入", "标题", "10"))
End Sub

Private Sub Command2_Click()
a = a - 1
Print a
End Sub

在通用处进行声明