在VB中,加一个命令按钮,要写什么代码,才能让命令按钮点出显示的文字不同?

2024年11月22日 12:36
有1个网友回答
网友(1):

Dim i As Integer

Private Sub Command1_Click()
i = i + 1
If i = 1 Then
Command1.Caption = i
Else
Command1.Caption = Int(Rnd * 100) + 1
End If
End Sub