我想做一个小程序，功能很简单就是点击一下按钮，计数就增加一个，在文本框中显示出来，我自己写的代码如下，不知道为什么实现不了这个效果？请大虾帮忙看一下是怎么回事？


Private Sub Command1_Click()
Text1.Text = i
i = i + 1
End Sub

Private Sub Form_Load()
Dim i As Integer
End Sub
界面如下


[[it] 本帖最后由 adsdomain 于 2008-10-1 21:07 编辑 [/it]]

阅读书上关于“变量的作用域”或者“变量的生存周期”一节。没有书请自行搜索。

但是定义为public提示出错

。。。。。。。。。。两个private.......两个sub
请问楼主那是同一个i吗？

难道书上告诉你在Sub和Function里面可以用Public来定义变量？

难道Public的意思是Sub外可以访问Sub内的变量？那模块外可以访问模块内的变量用什么访问修饰符？

本问题已经解决，原来是过程级变量和模块级变量的问题啊～
把代码改成
Dim i As Integer
Private Sub Command1_Click()
Text1.Text = i
i = i + 1
End Sub
就行了！
谢谢multiple1902 的提示了！

如果你这个i仅仅是这里用，那么可以简化一下：

Private Sub Command1_Click()
Static i As Integer
Text1.Text = i
i = i + 1
End Sub

果然可以用静态变量啊.