ftsg.net
当前位置:首页 >> VB中如何给按钮设置右键点击事件?(非常菜 >>

VB中如何给按钮设置右键点击事件?(非常菜

请看附件

如果是窗体右键单击事件,是 Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick If e.Button = Windows.Forms.MouseButtons.Right Then '这里写你要的代码 End If ...

那个鼠标按下事件里有的,mousedown事件里写代码 If Button = 2 Then MsgBox "你按下右键了!" 麻烦采纳,谢谢!

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Select Case Button Case 1 MsgBox "单击左键" Case 2 MsgBox "单击右键" Case 4 MsgBox "单击中键" End Select End Sub

Private Sub Command9_Click() On Error GoTo Err_Command9_Click DoCmd.GoToRecord , , acNewRec Exit_Command9_Click: Exit Sub Err_Command9_Click: MsgBox Err.Description Resume Exit_Command9_Click End Sub 这个是添加记录的代码

VB实现窗口的弹出式菜单 在Windows95、Windows98或NT的风格中,有按动鼠标器右键弹出下拉菜单的操作,在VB执行环境下,有一些控件本身具有弹下拉菜单的功能,如TexTbox控件等,但大多数编辑类控件以及窗体本身却没有此功能,要在窗口中任意位置...

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) if button = 2 then 这里写你想要的代码 end if End Sub

1.在"菜单编辑器窗口"中建立一个将要作为弹出式菜单的主菜单项,如你所说的,就是"编辑"主菜单项,此菜单项的标题为"编辑",名称为"EDIT",所包含的菜单项为"剪切","复制","粘贴".建立弹出式菜单所需的菜单后,可以把"编辑"的VISIBLE属性设置为FALSE,...

你是想使用右键菜单吧? 例如给picturebox添加右键菜单可以这样: 从工具箱拖一个ContextMenuStrip到窗体上,然后自己添加你喜欢的菜单项,然后把PictureBox的ContextMenuStrip属性设置为你你刚添加的哪个ContextMenuStrip,下拉列表里会有你刚...

网站首页 | 网站地图
All rights reserved Powered by www.ftsg.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com