在VB6.0中，怎么写一个命令按钮多次单击按钮的不同事件？

比如：第一次单击命令按钮，输出VV；第二次单击命令按钮，输出VVVV。如此继续，即每单击一次命令按钮，比上一次多输出2个V。用简单的语句就可以了，求助！！... 比如：
第一次单击命令按钮，输出VV；第二次单击命令按钮，输出VVVV。如此继续，即每单击一次命令按钮，比上一次多输出2个V。
用简单的语句就可以了，求助！！展开

 我来答

1个回答

#合辑# 面试问优缺点怎么回答最加分？

K_BEAT
2019-04-06 · TA获得超过1245个赞

知道小有建树答主

回答量：879

采纳率：91%

帮助的人：388万

我也去答题访问个人页

关注

展开全部

使用静态变量或全局变量可达到此种效果，以静态变量为例，参考代码：

Option Explicit

Private Sub Command1_Click()
    Static i As Integer
    
    i = i + 2
    Print String$(i, "V")
End Sub

Private Sub Form_Load()
    AutoRedraw = True
End Sub

演示动画：

追问

那如果是dim i as string，只在命令按钮的单击事件里输入一行代码然后直接print i 的话怎么办呢

追答

可以用字符串拼接，不过VB的字符串拼接效率低，没有 String$ 函数效率高，参考代码如下：

Option Explicit

Dim i As String

Private Sub Command1_Click()
    i = i & "VV"
    Print i
End Sub

Private Sub Form_Load()
    AutoRedraw = True
End Sub