Since the IF conditions are mutually exclusive, a SELECT-CASE-ENDSELECT would be more appropriate.
_________________________
There are two types of vessels, submarines and targets.