下列算法是否正确?
Dim I as Integer
for I=0 to 10
i=i+1
next I
若不正确,请写出:
下列算法是否正确?
Dim I as Integer
for I=0 to 10
i=i+1
next I
若不正确,请写出:
'代码正确,但毫无意义,可以修改成这样:
Dim i As Integer , a As Integer
For i = 0 To 10
a = a + i
Next i
MsgBox a
你的这样错了吧.
还有不知道你要算什么正确的是
Dim i as Integer
for i = 0 to 10
i = i + 1
next I
如你是要算0至于10的和那是:
Private Sub Form_Click() Dim I%, O% For I = 0 To 10 O = O + I Next I Print O End Sub
Dim I as Integer
for I=0 to 10
l=l+1
next I