试题 试卷
题型：单选题 题类：常考题 难易度：普通
上海市浦东新区2019-2020学年高一下学期信息技术6月综合练习试卷（二）
Private Sub Command1_click()
Dim s as integer,I as integer
S=0
For i=1 to 20 step 3
s=s+(-1)^i*i
Next i
Label1.caption=str(i)
Label2.caption=str(s)
End Sub
PRIVATE SUB FORM__CLICK()
X=INT(RND)+5
IF X THEN PRINT X
ELSE PRINT X+2
END SUB
试题篮
