a = 2 //a的值是1,2,3Select Case a Case 1 MessageBox "1" Case 2 MessageBox "2" Case 3 MessageBox "3"End Select
