Dim Right As New oDCMotor 
Dim Left As New oDCMotor

Sub Main() 
  Right.IOLineP = 17
  Right.IOLineD = 27
  Right.IOLineB = 25
  Right.Operate = 1
  Left.IOLineP = 18 
  Left.IOLineD = 26
  Left.IOLineB = 24
  Left.Operate = 1
  Left.InvertOutD = cvTrue
End Sub