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

Question

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

Answer 1

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

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