select Case (elemento a evaluar) Case "0081": 'sentencia Case "0082": 'sentencia .. .. Case Else 'sentencia ... End Select