none
Windows Forms如何用右键触发操作? RRS feed

  • 问题

  • 'VS2008如何用右键触发操作?以下是VB6的代码,但是转换成VS2008就不行了。
    
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbRightButton Then
    MsgBox "右键"
    End If
    End Sub
    
    
    '这是VS2008的代码。   
    
     Private Sub Form_MouseDown(ByRef Button As Short, ByRef Shift As Short, ByRef X As Single, ByRef Y As Single)
            If Button = VB6.MouseButtonConstants.RightButton Then
                MsgBox("右键")
            End If
        End Sub
    
    'VS2008这样虽然也可以,但是我发现这里面的“Form”不是一个控件或窗体。也就是说:不能触发这个过程里的动作。
    
    请问如何解决?
    我在    Private Sub ToolStripStatusLabel1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripStatusLabel1.Click的括号里尝试输入ByRef Button As Short, ByRef Shift As Short, ByRef X As Single, ByRef Y As Single,但是提示“冲突”。
    高手,帮忙!给我个例子:假设我要在窗体里按下右键,就弹出“右键”的对话框。这该如何实现“?
    2009年11月28日 8:00

答案

  • 你好!
         使用MouseDown事件可以实现:
    Private Sub form1_MouseDown(ByVal sender As Object, ByVal e As MouseEventArgs)
         If e.Button = MouseButtons.Right Then
             MessageBox.Show("右键被点击")
         End If
     End Sub
    
    

    周雪峰
    • 已标记为答案 zsxsoft 2009年11月28日 9:00
    2009年11月28日 8:15
    版主