简单的一个VB程序题！
答案:3 悬赏:30 手机版
解决时间 2021-04-26 16:37
- 提问者网友：不爱我么
- 2021-04-26 13:26
一个窗体上有一个按扭。当点击第一次没有反应、第二次美有反应。当第三次点击的时候出现提示框"你已点击三次" 就这个请问谁可以给我代码?
最佳答案
- 五星知识达人网友：过活
- 2021-04-26 13:45
Private Sub Command1_Click()
Static a As Integer
a = a + 1
If a = 3 Then MsgBox "你已经单击了三次"
End Sub
Static a As Integer
a = a + 1
If a = 3 Then MsgBox "你已经单击了三次"
End Sub
全部回答
- 1楼网友：迟山
- 2021-04-26 15:29
Private Sub Command1_Click()
Static a As Integer
a = a + 1
If a = 3 Then
MsgBox "你已经点击了三次"
End If
End Sub
- 2楼网友：酒者煙囻
- 2021-04-26 14:21
Option Explicit
Dim a As Byte
Private Sub Command1_Click()
a = a + 1
If a = 3 Then
a = MsgBox("你已点击三次", , "提示")
End If
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯