二级Visual+Basic语言程序设计模拟70 1.docx
《二级Visual+Basic语言程序设计模拟70 1.docx》由会员分享，可在线阅读，更多相关《二级Visual+Basic语言程序设计模拟70 1.docx（28页珍藏版）》请在冰豆网上搜索。
二级Visual+Basic语言程序设计模拟701
[模拟]二级VisualBasic语言程序设计模拟70
单项选择题
第1题：
以下程序的功能是随机产生10个两位的整数：
OptionBase1
PrivateSubCommand1_Click（）
Dima（10）AsInteger
DimiAsInteger
Randomize
Fori=1To10
a（i）=Int（Rnd*100）+1
Printa（i）
Nexti
EndSub
运行以上程序，发现有错误，需要对产生随机数的语句进行修改。
以下正确的修改是______。
A.a（i）=Int（Rnd*100）
B.a（i）=Int（Rnd*90）+10
C.a（i）=Int（Rnd*100）+10
D.a（i）=Int（Rnd*101）
参考答案：
B
由Rnd函数生成的随机数在0～1之间，包括0但不包括1，所以有可能产生0，与题目要求的两位的整数不符。
所以语句a（i）=Int（Rnd*100）+1需要修改为a（i）=Int（Rnd*90）+10，这样就能正确产生两位的整数了。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第2题：
有如下程序：
a=1:
b=2:
c=3
a=a+b:
b=b+c:
c=b+aIfa﹤﹥3Orb﹤﹥3Thena=b-a:
b=c-a:
c=b+aEndIf
Printa+b+c
运行后，输出的结果是____。
A.16
B.3
C.6
D.8
参考答案：
A
第3题：
下列方法中，不属于软件调试方法的是（）。
A.回溯法
B.强行排错法
C.集成测试法
D.原因排除法
参考答案：
C
软件调试主要采用以下三种方法：
强行排错法：
作为传统的调试方法，其过程可概括为设置断点、程序暂停、观察程序状态、继续运行程序。
回溯法：
该方法适合于小规模程序的排错、即一旦发现了错误，先分析错误征兆，确定最先发现”症状”的位置。
原因排除法：
原因排除法是通过演绎和归纳，以及二分法来实现。
第4题：
窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下：
PrivateSubCommand1_Click（）
CD1.Filter＝"AllFile|*.*|TextFile|*.txt|Word|*.Doc"
CD1.FilterIndex＝2
CD1.FileName＝"E:
\Test.ppt"
CD1.InitDir＝"E:
"
CD1.ShowOpen
EndSub
关于上述程序，以下叙述中正确的是______。
A.初始过滤器为"*.*"
B.指定的初始目录为"E:
\"
C.以上程序代码实现打开文件的操作
D.由于指定文件类型是.ppt，所以导致打开文件的操作失败
参考答案：
B
通用对话框的FilterIndex属性值表示默认的过滤器，值为2表示初始过滤器为过滤器中的第2个，即"*.txt"。
InitDir属性表示打开对话框时的初始目录。
ShowOpen方法表示显示打开文件对话框。
打开文件通用对话框只是返回选中的文件，具体如何操作文件需要另行编程决定，因此不会导致文件打开失败。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第5题：
设窗体上有2个文本框Text1和Text2，并有下面的事件过程：
Dimn
PrivateSubText1_KeyPress（KeyAsciiAsInteger）
If"A"〈=Chr（KeyAscii）AndChr（KeyAscii）〈="Z"Then
n=n+1
EndIf
IfKeyAscii=13Then
Text2.Text=n
EndIf
EndSub
程序运行时，在文本框Text1中输入“VisualBasic6.0”并按回车键后，在文本框Text2中显示的是（）。
A.2
B.9
C.13
D.16
参考答案：
A
KeyPress事件的参数KeyAscii为所按键的ASCII码，Chr函数把这个ASCII码转换为对应的字符，回车键的ASCII码值是13。
程序中KeyPress过程的功能是统计Text1文本框中输入的字符串中A～Z之间字母的个数，按回车键后把个数值显示在Text2文本框中。
在Text1文本框中输入"VisualBasic6.0"，其中A～Z的字母有2个，按回车键后，Text2文本框中将会显示2。
因此本题答案为A）。
第6题：
下面叙述中错误的是____
A.全局变量只能在标准模块中定义
B.全局变量可以在窗体模块中定义
C.窗体级变量可以在窗体的过程中定义
D.局部变量可以在窗体的所有过程前面定义
参考答案：
B
全局变量的作用域最大，可作用于应用程序的每个模块和过程，全局变量只能在标准模块中声明，不能再窗体模块或者过程中声明，所以A选项正确，B选项错误。
窗体级变量属于模块变量，可以用于该窗体的所有过程，故选项C正确。
局部变量是在过程内定义的变量，故选项D正确。
答案为B。
第7题：
设有如下事件过程：
PrivateSubForm_Click（）
Sum=0
Fork=1To3
Ifk＜=1Then
x=1
ElseIfk＜=2Then
x=2
ElseIfk＜=3Then
x=3
Else
x=4
EndIf
Sum=Sum+x
Nextk
PrintSum
EndSub
程序运行后，单击窗体，输出结果是______。
A.9
B.6
C.3
D.10
参考答案：
B
程序执行过程如下：
k=1，k＜=1成立，执行x=1，sum=sum+x=1k=2，k＜=2成立，执行x=2，sum=sum+x=1+2=3k=3，k＜=3成立，执行x=3，sum=sum+x=3+3=6，循环结束。
因此最后输出Sum的值为6。
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第8题：
在窗体上画一个名称为Text1的文本框，然后画3个单选按钮，并用这3个单选按钮建立一个名为Optionl的控件数组，程序运行后，如果单击某个单选按钮，则文本框中的字体根据所选择的单选按钮切换，如图1所示。
请选择适合空白处的语句____。
PrivateSubOption1．Click（IndexAsInteger）
SelectCase
Case0：
a=“宋体”
CaseI：
a=“黑体”
Case2：
a=“楷体GB2312”
EndSelect
Text1．=a
End
A.OppntTionText
B.IndexText
C.IndexFont
D.OptionFont
参考答案：
C
本题考查控件数组。
Optionl数组中每个元素的名字为Optionl，依靠不同的Index属性来区分不同的控件。
变量a表示选择不同按钮后的不同字体，字体名属性为Font属性集的默认属性（FontName），这里可以直接使用Font属性。
第9题：
为了用键盘打开菜单和执行菜单命令，第一步应按的键是____。
A.功能键F10或Alt
B.Shift＋功能键F4
C.Ctrl或功能键F8
D.Ctrl＋Alt
参考答案：
A
第10题：
为了使窗体左上角不显示控制框，需设置为False的属性是（）。
A.Visible
B.Enabled
C.ControlBox
D.Caption
参考答案：
C
窗体的Visible属性是设置窗体可见不可见；Enabled属性是设置可用不可用；Caption属性是用来设置窗体标题栏上显示的内容；controlBox属性是设置窗体左上角是否显示控制框，当属性值为True时，显示控制框，否则False时，不显示。
故选项C正确。
第11题：
与数学式子
对应的VisualBasic表达式是____
A.Sqr（（a+b）/a*b）
B.Sqr（（a+b）/a*b）
C.（（a+b）/（a*b））^1/2
D.（（a+b）/a*b）^（1/2）
参考答案：
A
算术运算符优先级从高到低依次是乘方，取负，乘法和除法运算符，整除运算符，加法和减法运算符；数学函数的平方根（Square）函数是sqr（x），返回值为自变量x的平方根。
从表达式上看首先a、b之和除以a、b的乘积，最后求其平方根。
故首先将（a+b），然后是（a*b），接着是求商，即（a+b）/（a*b）,最后求平方根，因为平方根的优先级比乘除法高，故应为Sqr（（a+b）/a*b），故B选项正确。
A项中表达式与数学式不大对应，A项是先求a、b之和，接着除以a，再接着乘以b，这和题目意思不对应，故A项错误。
平方根函数是sqr（x），故C项和D项错误。
第12题：
下列叙述中正确的是____。
A.栈是"先进先出"的线性表
B.队列是"先进后出"的线性表
C.循环队列是非线性结构
D.有序线性表既可以采用顺序存储结构，也可以采用链式存储结构
参考答案：
D
栈是先进后出的线性表，所以A错误；队列是先进先出的线性表，所以B错误；循环队列是线性结构的线性表，所以C错误。
第13题：
可以产生30～50（含30和50）之间的随机整数的表达式是____。
A.Int（Rnd*21＋30）
B.Int（Rnd*20＋30）
C.Int（Rnd*50－Rnd*30）
D.Int（Rnd*30＋50）
参考答案：
A
第14题：
有一程序段，其功能是：
当x﹥0时，y=x；当-2=﹤x﹤=0时，y=-x,当x﹤-2时，产生一个“输入错误”信息框。
则下列程序空白处应为____。
PrivateSubForm_Click（）
x%=InputBox（"请输入x的值：
"）Ifx﹥0Theny=x
____y=-x
Else
MsgBox"输入错误"
EndIf
Printy
EndSub
A.Elsex﹥=-2Andx﹤=0Then
B.ElseIfx﹥=-2Andx﹤=0Then
C.ElseIfx﹥=-2Andx﹤=0
D.ElseIfx﹥=-2Andx﹤=0Then
参考答案：
B
第15题：
在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
PrivateSubCommand1_Click（）
Dimarr（10）
Fori=6To10
arr（i）=i-5
Nexti
Label1.Caption=arr（0）+arr（arr（10）/arr（6））
EndSub
运行程序，单击命令按钮，则在标签中显示的是____。
A.0
B.1
C.2
D.3
参考答案：
A
程序为使用For语句为数组中部分元素赋值，没显示赋值的数组元素的值默认为0，因此arr（0）=0，arr（10）=10-5=5，arr（6）=6-5=1，arr（arr（10）/arr（6））即，arr（5/1）=arr（5）=0，arr（0）+arr（5）=0+0=0。
因此标签中显示为0。
第16题：
下列循环能正常结束的是（）。
A.x=5Dox=x+1LoopUntilx〈0
B.x=1Dox=x+2LoopUntilx=10
C.x=10Dox=x+1LoopUntilx〉0
D.x=6Dox=x-2LoopUntilx=1
参考答案：
C
本题考查Do型循环。
对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体：
如果是后判断条件，则无论条件如何至少执行一次循环体。
由Until引出的循环条件为False时执行循环体，条件为True时退出循环；题目中选项A）中循环变量逐渐增加，不可能小于0，选项B）中循环变量的步长为2，初值为1，不可能等于10。
而选项C）中执行一次循环体，条件成立，退出循环。
选项D）和选项B）相似，循环变量无法等于1。
第17题：
下列关于栈的叙述正确的是____。
A.栈是非线性结构
B.栈是一种树状结构
C.栈具有“先进先出”的特征
D.栈具有“后进先出”的特征
参考答案：
D
第18题：
数据库概念设计的过程中，以下各项中不属于视图设计设计次序的是______。
A.自顶向下
B.由整体到个体
C.由内向外
D.由底向上
参考答案：
B
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第19题：
下面的数组声明语句中正确的是（ ）。
A.Dimgg[1,5]AsString
B.Label1.BackStyle=1
C.Dimgg（1To5）AsString
D.Dimgg[1:
5,1:
5]AsString
参考答案：
C
声明数组时，数组的默认下界为0，如果希望下界不是0，可以用关键字To规定下界。
如选项C）中，数组gg的索引从1到5。
第20题：
用InputBox函数设计的对话框，其功能是（ ）。
A.能接收用户输入的数据，但不会返回任何信息
B.能接收用户输入的数据，并能返回用户输入的信息
C.既能用于接收用户输入的信息，又能用于输出信息
D.专门用于输出信息
参考答案：
B
InputBox函数在一个对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容。
第21题：
窗体上有一个菜单编辑器设计的菜单。
运行程序，并在窗体上单击鼠标右键，则弹出一个快捷菜单，如图所示。
A.在设计“粘贴”菜单项时，在菜单编辑器窗口中设置了“有效”属性（有“√”）
B.菜单中的横线是在该菜单项的标题输入框中输入了一个“-”（减号）字符
C.在设计“选中”菜单项时，在菜单编辑器窗口中设置了“复选”属性（有“√”）
D.在设计该弹出菜单的主菜单项时，在菜单编辑器窗口中去掉了“可见”前面的“√”
参考答案：
A
快捷菜单中的“粘贴”菜单项为无效时，在菜单编辑器口窗中“有效”属性应该是不选中状态，没有“√”，故A选项错误。
第22题：
语句PrintString（3,"string"）的功能是____
A.在窗体上显示字符串sss
B.把数值型数据3转换为字符串
C.从字符串string左起取出3个字符输出
D.从字符串string第3个字符开始至末尾取子字符串
参考答案：
A
String（n，s）生产n个同一字符组成的字符串，此字符由s指定，当s为字符是，生产n个由s组成的字符串，当s为字符串时，字符为s的第一个字符。
String（3，"string"）生产3个由同一字符´s´组成的字符串"sss",故选项A正确。
第23题：
文本框接受的最长字符数由文本框的____属性确定。
A.MaxLength
B.MultiLine
C.Width
D.Text
参考答案：
A
本题考查文本框的常见属性。
文本框中存放的字符个数由MaxLength属性决定。
当取值为0时表示任意长的字符，取值为非0，表示相应个数字符。
第24题：
下列叙述中正确的是____
A.一个算法的空间复杂度大，则其时间复杂度也必定大
B.一个算法的空间复杂度大，则其时间复杂度必定小
C.一个算法的时间复杂度大，则其空间复杂度必定小
D.算法的时间复杂度与空间复杂度没有直接关系
参考答案：
D
算法的空间复杂度是指算法在执行过程中所需要的内存空间，算法的时间复杂度，是指执行算法所需要的计算工作量，两者之间并没有直接关系，答案为D。
第25题：
下列叙述中，正确的是（）。
A.软件交付使用后还需要进行维护
B.软件一旦交付使用就不需要再进行维护
C.软件交付使用后其生命周期就结束
D.软件维护是指修复程序中被破坏的指令
参考答案：
A
软件的运行和维护是指将已交付的软件投入运行，并在运行使用中不断地维护，根据新提出的需求进行必要而且可能的扩充和删改。
而软件生命周期是指软件产品从提出、实现、使用维护到停止使用退役的过程。
第26题：
在窗体E画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1＿Click（）
DimiAsInteger，nAsInteger
Fori=0To50
i=i+3
n=n+1
Ifi〉10ThenExitFor
Next
Text1．Text=Str（n）
EndSub
程序运行后，单击命令按钮，在文本框中显示的值是（）。
A.2
B.3
C.4
D.5
参考答案：
B
程序中For循环的结束有两种情况，一种是循环完指定的次数，一种是达到一定的条件后直接退出循环。
由于在循环体中循环变量i的值被修改：
i=i+3，因此，每次循环开始时i的取值为0，4，8，i为8时执行i＝i+3=11，n=n+1=3，这时i的值大于10，退出For循环，因此For循环执行了3次，即n的值为3。
所以在文本框中会显示3。
第27题：
在窗体上画1个文本框，名称为Text1，然后编写如下程序：
PrivateSubFormLoad（）
Open”C：
＼dat．txt”ForOutputAs#1
Text1．Text=””
EndSub
PrivateSubText1_KeyPress（KeyAsciiAsInteger）
If____________=13Then
IfUCase（Text1．Text=_______）Then
Close1
End
Else
Write#1．Text1．Text
Text1．Text=""
EndIf
EndIf
EndSub
程序的功能是，在C盘根目录下建立1个名为dat．txt的文件，在文本框中输入字符，每次
按回车键（回车符的ASCⅡ码是13）都把当前文本框中的内容写入文件dat．txt中，并清空文本
框中的内容；如果输入“END”，则结束程序，请选择适合空白处的语句（）。
A.KeyAscii”END”
B.Text1．Text”END”
C.Text1．Text13
D.KeyAscii13
参考答案：
A
本题考查KeyPress事件。
在Text1中输入字符时，将触发Text1的KeyPress事件，同时可返回一个KeyAscii参数（输入字符的ASCⅡ码，区分大小写）。
当KeyAscii为13时，表示输入了回车键，此时判断Text1的文本信息，如果Text1的文本为“END”，则关闭文件，退出程序。
第28题：
在窗体上有一个名称为Commandl的命令按钮，并编写有如下事件过程：
PrivateSubCommand1一Click（）
DimrecAsanimal
Open”c：
＼v．bTest．dat”ForRandomAs#lLen=Len（rec）rec.animalName=“cat”
rec.aColor=“White”
Put#1，，rec
Close#1
EndSub
记录类型定义如下：
PrivateTypeanimal
animalNameAsString*S20
aColorAsString*10
EndType
下列叙述中正确的是____。
A.记录类型animal不能在Forml中定义，必须在标准模块中定义
B.如果文件c：
＼vbTest．dat不存在，则Open命令执行失败
C.由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D.语句“Put#1，，rec”将animal类型的两个数据元素写到文件中
参考答案：
B
本题考查随机文件的基本操作。
随机文件以记录作为存储单位，以Random打开文件的格式为：
Open文件名ForRandomAs群文件号[Len≈记录长度],如果文件不存在，则打开失败。
写操作格式为：
Put[#]文件号，[记录号]，变量名。
可以将一个记录变量的内容写到指定的记录位置处，忽略记录号，则表示在当前记录后的位置插入一条记录。
读操作格式为：
Get[#]文件号，[记录号]，变量名。
如果忽略记录号，则读出当前记录后面的那一条记录。
一般记录类型在VB中是以1．Type定义的自定义类型，可以在窗体和标准模块中定义。
第29题：
有两个关系R、S如下：
由关系R通过运算得到关系S，则所使用的运算为______。
A.选择
B.投影
C.插入
D.连接
参考答案：
B
投影运算是指对于关系内的域指定可引入新的运算。
本题中S是在原有关系R的内部进行的，是由R中原有那些域的列所组成的关系。
所以选择B。
第30题：
以下程序段的功能是____。
x=8．6
y=Int（x+0．5）
Printy
A.输出y的绝对值
B.实现x的四舍五入
C.实现x的绝对值
D.实现y的四舍五入
参考答案：
B
本题考查函数Int的功能，Int（x）的作用是取不大于x的最小的整数，可以实现数据的四舍五入。
第31题：
下列可以激活属性窗口的操作是___________。
A.用鼠标双击窗体的任何部位
B.执行“工程”菜单中的“属性窗口”命令
C.按Ctrl+F4键
D.按F4键
参考答案：
D
[知识点][选项个数]4[试题编号][分数][题目类型][难度]
第32题：
下面不能在信息框中输出"VB"的是____。
A.MsgBox"VB"
B.x＝MsgBox（"VB"）
C.MsgBox（"VB"）
D.CallMsgBox"VB"
参考答案：
D
第33题：
计算下面分段函数的正确语句是（）。
A.y=IIf（X〉0，X+1，IIf（X〈0，x－1，0））
B.y=IIf（x=0，0，IIf（x〉0，X一1，x+1））
C.y=IIf（X〉0，x+1，IIf（x〈0，0，x－1））
D.Y=IIf（x=0，0，X－1，x+1）
参考答案：
A
第34题：
设a=4，b=5，e=6，执行语句Printa〈bAndb〈e后，窗体上显示的是（）。
A.TRUE
B.FALSE
C.出错信息
D.0
参考答案：
A
Print语句中计算表达式的值，按运算符的优先级顺序，关系运算符“〈”比逻辑运算符“And”优先级高。
先计算“〈”，结果为TureAndTure,再计算“And”，结果为Ture，故选A
第35题：
以下事件过程的功能是：
从已存在于磁盘上的顺序文件Num1．txt中读取数据，计算读出数据的平方值，将该数据及其平方值存入新的顺序文件Num2．txt中。
则在以下横线处合适的语句是（）。
PrivateSubFormCli
升级会员 