解析： 55、循环语句For i=20 To 10 Step -2的循环次数为____ ______。 A、 6 B、 4
C、 不循环 D、 5
正确答案： A
解析： 56、执行下面程序语句后， For i=1 to 3 i=i+1 Next i
变量i的值是_____。 A、 6 B、 4 C、 5 D、 3
正确答案： C
解析： 57、关于Do...Loop Until循环正确的描述是 __。
A、 如果\条件表达式\的值为真，则一次循环也不执行 B、 如果\条件表达式\的值为真，则要继续执行循环体
C、 不论\条件表达式\是否为\真\，至少要执行一次循环体 D、 如果\条件表达式\的值为假，则一次循环也不执行 正确答案： C
解析： 58、执行下列程序段输出的结果是__。 X%=2 Do While x<8 Print \ X=x+2 Loop A、 *** B、 ****
C、 * D、 **
正确答案： A
解析： 59、下列所列中，错误的一维数组说明语句是___ ______。 A、 Dim b(5 To 5) AS String B、 Dim b(-5 To 0) AS Byte
C、 Dim b(-10 To -20) AS Integer D、 Dim b(100) AS Double 正确答案： C
解析： 60、设有数组说明语句：Dim c(-1 To 1,1 To 5)，则下列表示数组 c 的元素选项中
正确的是____ _____。
A、 c(1,0) B、 c(i+j) C、 c(i)(j) D、 c(i,j) 正确答案： D
解析： 61、语句 Dim Abc(5) 所定义的数组元素个数是___ _____。 A、 6 B、 5 C、 4 D、 10
正确答案： A
解析： 62、要分配存放12个元素的整形数组，错误的数组声明是___ _____。 A、 Dim a%(1 To 12) B、 Dim a(3,4)
C、 Dim a(11) As integer D、 Dim a%(2,3) 正确答案： B
解析： 63、由 Array 函数建立的数组，其变量必须是_________类型。 A、 字符型 B、 整型 C、 变体型
D、 字符串类型 正确答案： C
解析： 64、下列叙述中,错误的说法是___________。
A、 使用Redim语句可以改变数组每维数的大小 B、 使用Redim语句可以对数组的元素初始化 C、 使用Redim语句可以改变数组的维数 D、 使用Redim语句可以改变数组的类型 正确答案： D
解析： 65、编写如下事件过程： Private Sub Form_Click() Dim x$,y$,Z$,i% x=\祝你成功\ y=\ For i=1 To 4
Z=Z+Mid(x,i,1)+Mid(y,i,1) Next i Print Z End Sub
程序运行后，单击窗体，则窗体上显示的内容是___________。 A、 祝你成功1234 B、 祝1你2成3功4 C、 祝4你4成4功4 D、 祝1你1成1功1 正确答案： B
解析： 66、在代码中，定义了一个子过程： Sub P(a,b) … End Sub 下面调用该过程的格
式正确的___ ________。
A、 P( )
B、 P 10,20,30 C、 P 10 D、 P 10,20 正确答案： D
解析： 67、在代码中定义了一个子过程： Sub P(a,b) … End Sub 下面调用该过程的正确
格式为___ ________。
A、 CALL P(10,20,30) B、 Call P( )
C、 CALL P(10,20) D、 Call P(10) 正确答案： C
解析： 68、编写如下事件过程： Private Sub Form_Click() Dim x$,y$,Z$,i% x=\祝你成功\ y=\ For i=1 To 4
Z=Z+Mid(x,i,1)+Left(y,1) Next i Print Z End Sub
程序运行后，单击窗体，则窗体上显示的内容是___________。 A、 祝1你1成1功1 B、 祝你成功1234 C、 1234祝你成功 D、 祝1你2成3功4 正确答案： A
解析： 69、设已定义函数过程 f，它有三个整型数值参数，再设 a, b 和 c 为实型变量，
则调用该函数过程使用的语句为___ _____。
A、 f a+b, b+c, c+a B、 f
C、 f(a+b, b+c)
D、 f(a+b, b+c ,c+a) 正确答案： D
解析： 70、通用过程可以通过执行\工具\菜单中的_____ ___命令来建立。 A、 通用过程
B、 添加过程 C、 添加窗体 D、 添加模块 正确答案： B
解析： 71、编写如下事件过程： Private Sub Command1_Click() a%=10 b%=5 Change a,b Print a,b
End Sub Private Sub Change(ByVal a As Integer,b As Integer) Dim Tmp As Integer Tmp=a a=b b=tmp End Sub
该程序运行后，单击命令按钮 Command1 ，输出的结果是________。 A、 5 10 B、 5 5 C、 10 10 D、 10 5 正确答案： C
解析： 72、有如下的程序： Private Sub Command1_Click() a=1:b=2:c=3
Call test(a,b+3,(c)) Print \
《计算机程序设计》-考前测试(1) - 图文
