单项选择题

有如下的程序片段,该程序片段的执行完后,共执行循环______次。
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 <= 10
End 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
单项选择题
在窗体中添加一个列表框(listBox1)和一个命令按钮,并编写如下代码:Private Sub Command1_ Click() Dim Entry, I, Msg Msg = Choose Ok to add 100 items to your list box. MsgBox Msg for I = 1 To 100 Entry = Entry & I List1. AddItem Entry Next IEnd Sub程序完成的功能是______。
A.本示例使用AddItem方法增加100项给一个列表框
B.本示例使用AddItem方法向一个列表框中添加的内容是1~100的列
C.本示例使用AddItem方法向一个列表框中添加的内容是1~100的和
D.本示例使用AddItem方法增加101项给一个列表框
相关试题
  • 以下叙述中错误的是 ______。
  • 栈通常采用的两种存储结构是 ______。
  • 下列程序打印结果为 ______。Privat...
  • 下列的程序段执行后,x的值为______...
  • 假定有一个菜单项,名为MenuItem,为了在运...