There is a command called

<MouseButton_MouseAction>

the code is as follows, and it works as expected:

'Script by Lindsay Adam www.pcbyvoice.com 2011
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, _
ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, _
ByVal dwExtraInfo As Long)
Sub Main
If ListVar1 = "LEFT Mouse Hold Down" then mouse_event (2, 0,0,0,0)
If ListVar1 = "LEFT Mouse Release" then mouse_event (4, 0,0,0,0)
If ListVar1 = "RIGHT Mouse Hold Down" then mouse_event (8, 0,0,0,0)
If ListVar1 = "RIGHT Mouse Release" then mouse_event (16, 0,0,0,0)
End Sub

I found some of the language burdensome, and shortened the highlighted lines in the following way, and now nothing happens when I speak the new command:

'Script by Lindsay Adam www.pcbyvoice.com 2011

Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, _

ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, _

ByVal dwExtraInfo As Long)

Sub Main

If ListVar1 = "Mouse Hold" then mouse_event (2, 0,0,0,0)

If ListVar1 = "Mouse Release" then mouse_event (4, 0,0,0,0)

If ListVar1 = "RIGHT Mouse Hold Down" then mouse_event (8, 0,0,0,0)

If ListVar1 = "RIGHT Mouse Release" then mouse_event (16, 0,0,0,0)

End Sub

Any assistance appreciated