转换时做循环到下一个循环

问题描述：

我需要帮助转换此代码类型从Do Loop While和Do While Loop到For...Next循环。我使用Visual Basic 2010 Express作为运行这些代码的程序，如果有人能帮助我，我将非常感谢。以下是需要转换为For ... Next循环类型的代码。再次感谢任何能够帮助的人。转换时做循环到下一个循环

Private Sub btnDo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDo.Click 
    Dim intNum, intSum As IntegerDo 
    intSum += intNum ‘accumulator/running total 
    intNum += 2  ‘update intNum 
    Loop While (intNum <= 50) 
     Me.lblDoAnswer.Text = intSum.ToString 
End Sub 

Private Sub btnDoWhile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)  Handles btnDoWhile.Click Dim intNum, intSum As Integer  
    Do While (intNum <= 50) 
     intSum += intNum ‘accumulator/running total 
     intNum += 2  ‘update intNum 
    Loop 
    Me.lblDoWhileAnswer.Text = intSum.ToString 
End Sub

答

试试这个：

For intNum As Integer = 0 To 50 Step 2 
    intSum += intNum ‘accumulator/running total 
Next

注：Step 2是intNum += 2语法，你在Do循环有相当。

转换时做循环到下一个循环

相关推荐