从书上写了这个程序不明白为什么会出现这个结果
Private Sub Command1_Click()
a = 1: b = 0
Select Case a
Case 1
Select Case b
Case 0
Print "**0**"
Case 1
Print "**1**"
End Select
Case 2
Print "**2**"
End Select
End Sub

那你想让结果是什么呀

Private Sub Command1_Click()
a = 1: b = 0
Select Case a
Case 1
  Select Case b
  Case 0
    Print "**0**"
  Case 1
    Print "**1**"
  End Select
Case 2
  Print "**2**"
End Select
End Sub 

楼主是没有分析清楚这个嵌套的结构，
所在大家写程序的时候都要像3楼版主那样层次分明。

看看三楼的...

嵌套的结构,看看三楼的就明白啦