单项选择题

有如下的程序片段，该程序片段的执行完后，共执行循环______次。Private Sub command1_ Click() total =0 Counter = 1 do Print Counter total = total + Counter Print total, "111" Counter = Counter + 1 if total ＞= 10 then exit do End if Loop while Counter ＜= 10End Sub
<上一题 目录 下一题>
热门 试题

单项选择题
给出下面的程序：Private Sub Command1_ Click() Dim Check, Counter Check= True: Counter = 0 do do while Counter ＜ 20 Counter = Counter +1 if Counter = 10 then Check=False exit do End if Loop Loop until Check=False MsgBox CounterEnd Sub 程序最后弹出的消息对话框的内容是______。
A．True
B．False
C．20
D．10
单项选择题
窗体上画一个命令按钮，然后编写如下代码：Private Type Record ID As Integer Name As String * 20End TypePrivate Sub command1 _ Click( Open c: file. txt for Input As MaxSize = LOF (1) for NextChar =MaxSize To Step-1 Seek #1, NextChar MyChar=Input(1，#1) Next NextChar Print EOF(1) Close #1 End Sub程序运行后，单击命令按钮，其输出结果为______。
A．True
B．False
C．0
D．Null
相关试题