You could perhaps use your Mouse Position (System.Windows.Forms)
Private Sub MoveCursor()
' Set the Current cursor, move the cursor's Position,
' and set its clipping rectangle to the form.
Me.Cursor = New Cursor(Cursor.Current.Handle)
Cursor.Position = New Point(x_coord, y_coord)
Cursor.Clip = New Rectangle(Me.Location, Me.Size)
End Sub
Then perform a click.
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Integer, _
ByVal dx As Integer, ByVal dy As Integer, ByVal cButtons As Integer, _
ByVal dwExtraInfo As Integer)
mouse_event(&H2, 0, 0, 0, 0)
or
mouse_event(&H4, 0, 0, 0, 0)