在VB中，Select语句可以用If语句代替。