Right-clicking in VB 6.0

[lugge]

Hello everybody

I have a little problem with Visual Basic.
How du you code right-click for commandbuttons?
Can't find anything anywere.
Please help me

From Lugge

[CaptainD]

In the MouseDown event do an
If Button 2 then
DoSomething
End If

[lugge]

Hello CaptainD.
Thanks for your help, but it doesn't work.
Maybe I am doing it wrong, but here is my code, please tell me what I am doing wrong.

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button2 Then
List1.AddItem "hello"
End If
End Sub

I hope that you can help me.

[CaptainD]

Put a space and "=" sign between "Button2" (should be Button = 2)

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
List1.AddItem "hello"
End If
End Sub
 

Hello CaptainD.
Thanks for your help, but it doesn't work.
Maybe I am doing it wrong, but here is my code, please tell me what I am doing wrong.

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button2 Then
List1.AddItem "hello"
End If
End Sub

I hope that you can help me.

[lugge]

Thank you very much....it helped with the =