9．whileループ
(1) 動作
button1を押すと、label1に１から１０までの整数の総和を表示する。
(2) Visual Basicの書き方
Private Sub button1_Click()
Dim i, S As Integer
i = 1
S = 0
Do While i <= 10
S = S + i
i = i + 1
Loop
label1.Caption = S
End Sub
(3) Visual J++の書き方
private void button1_click(Object source, Event e)
{
int i = 1 , S = 0;
while (i <= 10)
{
S = S + i++;
}
label1.setText(String.valueOf(S));
}