VB语言 “如果鼠标左键单击”的代码
3个回答
展开全部
首先按钮是有点击事件的,为什么要用if呢
private sub command2_click()
'你要出现的某某某是什么东西呢?
'如果是出现一个提示
msgbox "你点击了按钮"
'如果是要出现某个控件比如一个原来是不可见的文本框
text1.visalbe=true
'如果是要出现一个新的窗体form2
form2.show
'如果要关闭原来的窗体
me.hide
end sub
private sub command2_click()
'你要出现的某某某是什么东西呢?
'如果是出现一个提示
msgbox "你点击了按钮"
'如果是要出现某个控件比如一个原来是不可见的文本框
text1.visalbe=true
'如果是要出现一个新的窗体form2
form2.show
'如果要关闭原来的窗体
me.hide
end sub
追问
记得安装程序的时候吗,那个下一步下一步的,我点下一步会出现一个新窗口!!这个意思
追答
那就这样
private sub command2_click()
form2.show '显示新的窗口
me.hide '隐藏原窗口
end sub
展开全部
Private Sub Command2_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
MsgBox "左键单击出现某某某"
End if
End Sub
If Button = 1 Then
MsgBox "左键单击出现某某某"
End if
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你这一句话 问了4个问题 无从答起
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询