Visual Basic案例选择内部下一步停止后第一次迭代

Question

这似乎是一个相当微不足道的事情，但我不能让它工作。有没有人有任何想法，为什么下面的代码只是返回一个消息框与“Z = 0”？非常感谢你的帮助。

For z As Integer = 0 To 5 
    Select Case z 
     Case z = 0 
      MsgBox("z = " & z) 
     Case z = 1 
      MsgBox("z = " & z) 
     Case z = 5 
      MsgBox("z = " & z) 
    End Select 
Next 

Answer 1

您正在为每个case语句指定一个z值。

只需使用：

For z As Integer = 0 To 5 
    Select Case z 
     Case 0 
      MsgBox("z = " & z) 
     Case 1 
      MsgBox("z = " & z) 
     Case 5 
      MsgBox("z = " & z) 
    End Select 
Next