李煜虞美人赏析及译文:VB程序按钮

来源:百度文库 编辑:高考问答 时间:2024/04/29 01:46:11
要设置按钮按第1次时提示:“你按的是第1次”,按钮按下第2次时提示:“你按的是第2次”,这个设置在VB里怎样写代码呢?请写明代码!谢谢
**************************************
不好意思,忘记了,我要设置的是第1次提示:你好!第2次提示:大家好!该怎么写???谢谢了
*********************************************
zdingyun:你的方法都是显示“你好”!,不成功啊

Private Sub Command1_Click()
Static n As Integer
n = n + 1
Command1.Caption = "你按的是第" & n & "次"
End Sub

Option Explicit
Dim n As Integer
Private Sub Command1_Click()
n = n + 1
If n = 1 Then
Command1.Caption = "你好!"
ElseIf n >= 2 Then
n = n - 2
Command1.Caption = "大家好!"
End If
End Sub

可以用label或text记录每次按下按钮的次数,每按下一次将label或text中的数值累加。