首页 > 全部 > 二级VB > 国家二级VB机试(控制结构)模拟试卷20

国家二级VB机试(控制结构)模拟试卷20

本单篇文档共21549字,内容预览3600字,预览为有答案版,源文件无水印,下载后包含无答案空白卷版和有答案版,同时也有计算机类NCRE全国计算机二级整科真题模拟题,讲义课件,思维导图,易错高频题等下载。
二级VB 章节练习 6942人下载
价格: 0.60 原价:¥7.00
收藏

国家二级VB机试(控制结构)模拟试卷20

选择题

1.窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:

Private Sub Commandl_Click()

Dim count(10)As Integer’第1个For循环

For i=0 To 9

count(i)=0

Next

S=Trim(Textl.Text)

strLen=Len(s)’第2个For循环

For i=1 To strLen

c=Mid(s,i,1)

Ifc>=”0”And C<=”9”Then

X=Val(c):count(i)=count(i)+1

End If

Next’第3个For循环

For i=0 TO 9

Print Str(i),count(i)

Next

End Sub

运行程序后,发现不能实现题目的要求,程序应该进行的修改是(D)

A. 将第2个For循环的初值改为0

B. 将第2个For语句改为For i=0 To 9

C. 去掉x=Val(c)语句

D. 将count(i)=count(i)+1改为count(x)=count(x)+1

解析:本题中要求分别统计数字0~9的个数,使用了一个数组count来存放各个数字的个数。在第一个For循环中,将数组的各个元素设置为0,在第二个循环中,依次取出字符串中的每一个字符,判断是不是在0~9之间,如果在范围内,则应该令对应的数组元素加1。如果写成count(i)=count(i)+l,只能顺序的令每一个数组元素都加1,只有改写成count(x)=count(x)+1,让x作为下标,才能保证让x对应的数组元素加1。

2.在窗体上画一个组合框,其名称为Combol,然后编写如下事件过程:

Private Sub Form_Load()

Combo1.Text=”1”

For i=1 To 10

Sum=Sum+i

Next i

Combo1.Text=Sum

End Sub

程序运行后,输出结果为(C)

A. 在组合框的编辑区中显示1

B. 在组合框的编辑区中显示不定值

C. 在组合框的编辑区中显示55

D. 出错信息

解析:组合框的Text属性将会返回或者设置编辑区中的文本,本题中显示的是1~10的累加和55。

3.下面循环语句中在任何情况下都至少执行一次循环体的是(C)

A. Do While

循环体

Loop

B. While

循环体

Wend

C. Do

循环体

Loop Until

D. Do Until

循环体

Loop

解析:本题考查循环,Do Loop Unt订循环至少会执行一次,该循环是先执行然后判断循环条件。

4.设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:

Function fun(a As Integer,b As Integer)

While a>b

a=a-b

Wend

fun=a

End Function

在调试时发现函数是错误的。为使函数能产生正确的返回值,应做的修改是(D)

A. 把a=a.b改为a=b.a

B. 把a=a.b改为a=a\b

C. 把While a>b改为While a<b

D. 把While a>b改为While a>=b

解析:本题函数过程的原代码仅适合a不能被b整除的两数,而当a能被b整除时则不适用,如a=4,b=2,a除以b的余数为0,而原代码返回的函数值为2。因此需将语句While a>b改为While a>=b。

5.设有如下事件过程:

Pfivme Sub Form_Click()

x=0

While x<10

x=x+1:x=x*x

Wend

Print x

End Sub

运行程序,单击窗体,输出结果是(D)

A. 16

B. 19

C. 20

D. 25

解析:本题是简单while循环,在循环中改变循环变量x的值,要注意退出循环时x必然是不会满足循环条件的。本题中循环中x依次变化为1、4、25。

6.下面程序在调试时出现了死循环

Private Sub Commandl_Click()

n=InputBox(“请输入一个整数”)

Do

Ifn Mod 2=0 Then

n=n+1

Else

n=n+2

End If

Loop Until n=1 000

End Sub(D)

A. 只有输入的n是偶数时才会出现死循环,否则不会

B. 只有输入的n是奇数时才会出现死循环,否则不会

C. 只有输入的n是大于1000的整数时才会出现死循环,否则不会

D. 输入任何整数都会出现死循环

解析:本题考查循环。如果输入的n是偶数,那么在循环体中执行n=n+1,偶数+1是奇数,循环结束条件Loop Untiln=1000不会满足,形成死循环;如果输入的n是奇数,那么循环体内执行n=n+2,奇数+2依然是奇数,循环结束条件永远不会满足,也形成死循环。

7.假定有以下循环结构Do Until条件表达式循环体Loop则以下正确的描述是(D)

A. 如果“条件表达式”的值是0,则一次循环体也不执行

B. 如果“条件表达式”的值不为0,则至少执行一次循环体

C. 不论“条件表达式”的值是否为“真”,至少要执行一次循环体

D. 如果“条件表达式”的值恒为0,则无限次执行循环体

解析:本题考查的考点是有关Do型循环的。对于这种循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在while循环中条件为True时执行循环体,条件为False时退出循环,这一点要注意区分清楚。

8.以下Visual Basic不支持的循环结构是(D)

A. For…Next

B. For Each…Next

C. Do…Loop

D. Do…End Do

解析:Visual Basic支持的循环结构包括:For…Next循环、Fo

本文档预览:3600字符,共21549字符,源文件无水印,下载后包含无答案版和有答案版,查看完整word版点下载

剩余未完,查看全文
收藏
国家二级VB机试(控制结构)模拟试卷20

推荐资源

客服

扫码添加客服微信

热线

官方客服

如遇问题,请联系客服为您解决

电话客服:

客服微信:pujinet

工作时间:9:00-18:00,节假日休息

公众号

扫码关注微信公众号