试题 试卷
题型：判断题 题类： 难易度：容易
新疆伊犁哈萨克自治州霍城县2023-2024学年高一上学期信息技术10月月考试卷
Private Sub Command1_Click()
Dim n As Integer, s As Integer
n = 10
s = 10 ︿ n
Text1.Text = Str(s)
End Sub
运行程序时，单击命令按钮Command1后弹出如图所示的出错信息提示，引起该错误的原因是（ ）
①M=－M ②S=S+1 ③X+Y＝Z ④A=A+B*C
For i=1 To 8
d(i)= In(Rnd*10)
Next i
For i= 2 To 8
If i Mod 2=0 And d(i)> d(i-1)Then
d(i)=d(i-1)+1
ElseIf i Mod 2= 1 Then
If d(i)>d(i-2) Then
t=d(i): d(i)=d(i-2): d(i-2)=t
End If
Next i（ ）
试题篮
