单项选择题

设有如下程序
PrivateSubCommand1_Click（）
x=10：y=0
Fori=1To5
Do
x=x-2
y=y+2
LoopUntily＞5Orx＜-1
Next
EndSub
运行程序，其中Do循环执行的次数是（）。

A．15
B．10
C．7
D．3

<上一题 目录 下一题>
热门 试题

单项选择题
假定用下面的语句打开文件： Open File1.Txt For Input As #1 则不能正确读文件的语句是（）。

A．Input#1, ch$
B．Line Input#1, ch$
C．ch$=Input$(5, #1)
D．read#1, ch$
单项选择题
设有以下函数过程 Private Function Fun（a（）As Integer，b As String）AsInteger End Function 若已有变量声明： Dim x（5）as Integer，n As Integer，ch As String 则下面正确的过程调用语句是（）。

A．x(0)=Fun(x, "ch")
B．n=Fun(n, ch)
C．Call Fun x, "ch"
D．n=Fun(x(5), c
相关试题