单项选择题

以下程序段运行的结果是： ______。
Dim a(-1 To 5)As Boolean
Dim flag As Boolean
flag=False
Dim i As Integer
Dim j As Integer
Do Until flag=True
For i=-1 To 5
j=j+1
If a(i)=False Then
a(i)=True
Exit For
End If
If i=5 Then
flag=True
End If
Next
Loop
Print j

A．20
B．7
C．35
D．8
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Label1，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是： ______。
A．27
B．28
C．29
D．30
单项选择题
在窗体上画尸-个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() For i=1 to 4 If i=1 Then x=i If i＜=4 Then x=x+1 Print x Next i End Sub 程序运行后，单击命令按钮，其输出结果为： ______。
A．1 2 3 4
B．2 3 4 5
C．2 3 4 4
D．3 4 5 6
相关试题