求VB简单代码

来源：百度知道编辑：UC知道时间：2024/07/12 02:44:47

求VB简单代码
要求如下每次点击按钮时跳出窗口内容都不一样，
如:点击一次按钮跳出窗口内容是1 第二次内容是2
好的话我追加100分谢谢

private sub command1_click()
msgbox now()
end sub

不好意思,由于没有装VB所以也不知道有没有错.

dim a as integer
a=1
msgbox=a
a=a+1

Private Sub Command1_Click()
Static a As Integer
MsgBox (a)
a = a + 1
End Sub