Question

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

在VB中，加一个命令按钮，要写什么代码，才能让命令按钮点出显示的文字不同？如：第一次点那个命令按钮，会显示数字
5，第二次点就会随机，1到100中间随机显示一个数字，这个代码要怎么写？

Answer 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