/// 実習D3 制御文(For 〜Next) | プログラミング実習 |
プロジェクト名 実習D3和の計算3
動作
終わりの値nを入力すると1+5+9+13+17+21+…+nを計算する。
デザイン
略(実習D2参照)
コード(プログラム) [終了ボタン]のメソッドは省略しています。
Public Class Form1
Private Sub btnWa_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnWa.Click
Dim suu, wa, owari As Integer
wa = @
owari = CInt( A )
For suu = B To owari Step C
wa = D
Next
MessageBox.Show("答えは" & wa.ToString & "です。",
"実習D3")
End Sub
End Class
テスト
終わりの値=10 ⇒ 15、 終わりの値=100 ⇒ 1225
/// 実習D3 制御文(For 〜Next) | Copyright©2014 Hiroshi Masuda |