On Error Resume Next Sub Speedway1_FSCommand(ByVal command, ByVal args) Call Speedway1_DoFSCommand(command, args) End Sub Sub Speedway2_FSCommand(ByVal command, ByVal args) Call Speedway2_DoFSCommand(command, args) End Sub