mouse button

[CrazyVB]

Is this what you mean?

Dim x As Integer = 1 'x position of the click
Dim y As Integer = 1 'y position of the click
Dim button As Windows.Forms.MouseButtons = Windows.Forms.MouseButtons.Left 'Button to be pressed
Dim delta As Integer = 0 'Scroll wheel movement
Dim ev As New MouseEventArgs(button, clicks, x, y, delta)
OnMouseClick(ev)