Select Case 痹瓃

IF痹瓃虫じい矗ノIFElseIf㎝Elseㄓ耞琌单埃ノIFぇ临ノSelect Case粂猭

Private Sub Command1_Click()
    Select Case 1 + 1 '砞﹚ㄆㄒ 1+1
        Case Is = 2 'ㄆㄒ1+1=2
            Print "单" '"单"
        Case Is = 11 'ㄆㄒ1+1=11
            Print "单" '"单"
        Case Is = 12 'ㄆㄒ1+1=11
            Print "单" '"单"
        Case Else 'ㄆㄒ常ぃ才杠
            Print "ぃ单" '"ぃ单"
    End Select '瞒秨痹瓃
End Sub

