Question

Private Sub Command1_Click() s =0 For k=1 To 10 STEP 2 s=s+k Next k Text1.Text =s End Sub输出的数

Answer 1

Private Sub Command1_Click()
     s =0 
     For k=1 To 10 STEP 2 
         s=s+k 
         Next k 
         Text1.Text =s 
     End Sub

s初始为0  k循环1 3 5 7 9

s值依次输出1 4 9 16 25

最终为25