4个回答
展开全部
private sub command1_click()
if command1.tag="1" then
msgbox "第二次点击按钮" '执行你的事件
command1.tag=""
else
command1.tag="1"
end if
end sub
if command1.tag="1" then
msgbox "第二次点击按钮" '执行你的事件
command1.tag=""
else
command1.tag="1"
end if
end sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Dim N As Integer
Private Sub Command1_Click()
If N > 2 Then
N = 1
End If
If N = 2 Then
'事件
End If
N = N + 1
End Sub
Private Sub Form_Load()
N = 1
End Sub
如果是双击我就不知道了,这个方法很笨
Private Sub Command1_Click()
If N > 2 Then
N = 1
End If
If N = 2 Then
'事件
End If
N = N + 1
End Sub
Private Sub Form_Load()
N = 1
End Sub
如果是双击我就不知道了,这个方法很笨
追问
不行的啊,你怎么来确定N的值,好像要用handles
追答
每单击一次进行记录呀
并且不知道你具体想做什么
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
private sub button_DblClick()
执行的事件
end sub
执行的事件
end sub
追问
要是点击3次呢?
追答
晕,这个貌似没有!
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
那要双击后作一下,下一个事件的链接。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询