[求助]怎么模拟鼠标右击？

我想用VB写了个鼠标移动到某坐标后 自动点击鼠标右键。
但是不知道为什么会是 自动点击鼠标左键的。。。
高手过来9。9偶吧

原来写的。。。。
Private Sub Command1_Click()
SetCursorPos 416, 325
SetCursorPos 416, 321
mouse_event vbKeyRButton, 0, MOUSEEVENTF_RIGHTDOWN, 0, 0
End Sub

为什么会是 自动点击鼠标左键的呢？？

[此贴子已经被作者于2007-8-20 13:32:18编辑过]