执行下面程序 当单击窗体时 显示在窗体上第一行的内容是 200 第二行的内容是 8 。 Private Sub Form_Click() Dim I As Integer Sum As Integer For I = 0.5 To 8.5 Step 2.5 Sum = Sum + I * 10 Next I Print Sum Print I End Sub
执行下面程序,当单击窗体时,显示在窗体上第一行的内容是 200 ,第二行的内容是 8 。 Private Sub Form_Click() Dim I As Integer, Sum As Integer For I = 0.5 To 8.5 Step 2.5 Sum = Sum + I * 10 Next I Print Sum Print I End Sub