私は現在、ビジュアルベーシックの宿題に取り組んでいます。宿題は、奇数1-9の二乗値だけを表示することです。私はFor Nextを使って、割り当てによって指定されたようにする必要があります。私は答えはしたくないが、正しい方向への指し示しをする。ここで私のコードは9の二乗値を表示するだけですが、他の奇数の二乗値は表示しません。私はいくつかのチュートリアルを行ってきましたが、なぜループを続行しないのか分かりません。ビジュアルベーシック次回は繰り返さず、1で増分しない
Public Class MainForm
Private Sub exitButton_Click(sender As Object, e As EventArgs) Handles exitButton.Click
Me.Close()
End Sub
Private Sub displayButton_Click(sender As Object, e As EventArgs) Handles displayButton.Click
'Start/end values and retainer for the values
Dim startVal As Integer
Dim endVal As Integer
Dim squareVal As Integer
startVal = 1
endVal = 9
'For loop to separate the odd and even numbers to square the odd numbers.
For _val As Integer = startVal To endVal Step 1
If _val Mod 2 <> 0 Then
squareVal = _val * _val
squaresLabel.Text = squareVal.ToString() & ControlChars.NewLine
_val += 1
Else
squaresLabel.Text = _val.ToString() & ControlChars.NewLine
_val += 1
End If
Next _val
End Sub
End Class
あなたの質問は間違った言語でタグ付けされています –