求教一个菜鸟问题，如何实现按钮的多次点击

Question

声明一个局部变量i
private i as integer
在Click事件中添加代码：(如果文本控件是text1)
i=i+1
text1.text=i

Answer 1

大家帮忙分析一下
dim a as integer  '全局变量
private sub commond1_click()
for a =0 to 10 step 1
a=a+1
next a
select case a
case 1
commond1.caption="1"
case 2
commond1.caption="2"
case 3
commond1.caption="3"
............
end select
end sub
为什么commond1的caption不能更换

Answer 2

你太不细心了 看仔细了:for a =0 to 10 step 1
a=a+1
next a这样循环,无论你点击多少次,a的值始终是11.  
如果a 为全局变量,只要a=a+1就行,如果其它地方用不到a,a最好声明为静态局部变量.
编程一定要细心.

Answer 3

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

Answer 4

同意 CSDNZOLO(佐罗十三) 的
可惜来晚了，楼主可以结贴了