018 使用Select Case进行多条件处理（关键字Is）