vb期末试题1.docx
《vb期末试题1.docx》由会员分享,可在线阅读,更多相关《vb期末试题1.docx(14页珍藏版)》请在冰豆网上搜索。
vb期末试题1
判断题
1.VisualBasic程序开发的特点是面向对象的事件驱动。
【答案】T
2.Print_Text是一个不合法的变量名。
【答案】F
3.可以使用关键字Dim来定义全局变量。
【答案】F
4.Print方法中使用的Tab函数是在指定的位置输出信息。
【答案】T
5.在同一程序行输入多条语句,语句之间用分号“;”分隔。
【答案】F
6.在块结构条件语句中,语句块中的语句不能和Then子句在同一行上。
【答案】T
7.在VB中如果一段程序行太长我们可以使用“&”将一条语句输入在多个程序行中。
【答案】F
8.文本框的清空可以使用Cls方法。
【答案】F
9.在过程中只能使用一次ReDim语句来改变数组的大小。
【答案】F
10、VB的工程文件指的是文件后缀为.vbg的文件。
【答案】F
基础选择题
1.设a=2,b=3,c=4,d=5,则表达式Nota<=cOr4*c=b^2Andb<>a+c的值是()。
A)-1
B)1
C)True
D)False
【答案】D
2.下面可以表示注释语句开头的为()。
A、ReB、RC、RemD、dim
【答案】C
3.下列选项中窗体载入事件为()。
A、Load事件B、Click事件C、DblClick事件D、Unload事件
【答案】A
4.Timer控件可以使用下列哪种事件()。
A、Click事件B、Timer事件C、Dblclick事件D、Change事件
【答案】B
5.在InputBox函数中哪一个参数是必须的()。
A、PromptB、ButtonsC、TitleD、Context
【答案】A
6.如果将布尔常量值True赋值给一个整型变量,则整型变量的值为()。
A、0B、-lC、True D、False
【答案】B
7.可以获得字符串长度的函数是()。
A、Len() B、Length() C、StrLen() D、StrLength()
【答案】A
8.表达式FIX(6.3)+FIX(-6.6)的计算结果为()。
A、0B、1C、-1D、True
【答案】A
9.在下列四个表达式中,非法的VisualBasic表达式是()。
A、A=A+B B、A=(B=C) C、A+B>C D、以上均为合法表达式
【答案】D
10.可以同时删除字符串前导和尾部空白的函数是()。
A、LtrimB、RtrimC、TrimD、id
【答案】C
11.以下Case语句中错误的是()。
A、Case10To1
B、CaseIs>10
C、CaseIs>10,Is<50
D、Case3,5,Is>10
【答案】A
12.对DoUntil…Loop循环,正确的是()。
A、如果循环条件为false,则一次循环也不执行
B、如果循环条件为false,则至少执行一次循环
C、如果循环条件是不为0的常数,则至少执行一次循环
D、无论循环条件是否为"True",则至少执行一次循环
【答案】B
13.语句Dimarr(-3To5,2To6)AsInteger定义的数组元素有()个。
A、45B、40C、11D、54
【答案】A
14.用MsgBox函数显示的对话框,以下叙述正确的是()。
A.该对话框有一个“确定”按钮
B.该对话框有“是”,“否”两个按钮
C.该对话框有“是”,“否”,“取消”三个按钮
D.该对话框通过选择参数可以得到以上不同的的按钮组合
【答案】D
15.VisualBasic的特点不包括下面的()。
A、自动程序设计B、面向对象的程序设计
C、可视化程序设计D、时间驱动的程序设计
【答案】A
16.从键盘上能够输入两个字符串,分别保存在变量str1和str2中。
确定第二个字符串在第一个字符串中起始位置的函数是()。
A、LeftB、Mid
C、StringD、Instr
【答案】D
17.表达式Not(a+b=c-d)是()。
A.逻辑表达式B.字符表达式C.算术表达式D.关系表达式
【答案】A
18."-32768"的数据类型是()。
A.整型常量B.浮点型常量C.符号常量D.字符串型常量
【答案】D
若要使标签控件显示时不覆盖其背景内容,要对()属性进行设置。
(A)BackColor(B)BorderStyle(C)ForeColor(D)BackStyle
[D]
20.设x=5,表达式x>=10orx<=20的值是()。
A.TrueB.FalseC.0D.表达式非法
【答案】A
21.下列数据类型不可能占8个字节的是()。
A.DateB.CurrencyC.StringD.Integer
【答案】D
22.以下叙述中错误的是()。
A、一个工程中可以包含多个窗体文件
B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C、在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D、全局变量必须在标准模块中定义
【答案】B
23.设a=“VisualBasic”,下面使b=“Basic”的语句是()。
A、b=Left(a,8,12)B、b=Mid(a,8,5)
C、b=Rigth(a,5,5)D、b=Left(a,8,5)
【答案】B
24.在VB中,语句Print3>9的输出结果为()。
A、0B、1C、-1D、False
【答案】D
25.在VisualBasic中表达式x=5类型是()。
A、错误的表达式B、关系表达式C、算术表达式D、逻辑表达式
【答案】B
26.将变量k四舍五入保留2位小数的表达式是()。
A、Int((k+0.5)*100)/100B、Int((k*100)/100)+0.5
C、Int(k*100+0.5)/100D、Int(k*(100+0.5))/100”
【答案】C
27.下列关于数组的命名错误的是()。
A、4*Delta B、Alpha C、ABC D、ABT1
【答案】A
28、关于VisualBasic程序的说法不正确的是()。
A、一行可以写多条语句,语句之间用“:
”隔开
B、一条语句可以写在多行,用“空格”加“_”作为续行标志
C、程序中的大小写字母不区分
D、变量在使用之前必须先定义类型
【答案】D
29、以下合法的VisualBasic变量名是()。
A、ForLoopB、ConstC、9abcD、a#x
【答案】A
30、表达式5Mod3+3\5*2的值是()。
A、0B、2C、4D、6
【答案】B
程序阅读
1、二维数组的输出,阅读以下程序并作答。
OptionBase1
PrivateSubForm_Click()
Dima(3,3)AsInteger
Fori=1To3
Forj=1To3
a(i,j)=Val(InputBox(“Enterdata:
”)
Nextj
Nexti
Fori=1To3
Forj=1To3
Printa(i,j);“”;
Nextj
Print
Nexti
EndSub
31、以下关于语句OptionBase1说法正确的是()。
A、OptionBase语句可以出现在过程中
B、OptionBase语句用于指定数组下标下界
C、OptionBase语句后面的数字只能是1
D、OptionBase语句对多维数组不起作用
【答案】B
32、根据程序所示,总共会执行()次InputBox语句。
A、3
B、4
C、6
D、9
【答案】D
33、关于Print方法以下说法正确的是()。
A、Print方法后面没有要打印的数据项,则表示打印一个空格
B、Print方法前省略对象名,则在当前窗体上输出数据
C、Print不能打印字符串类型数据
D、Print后面只能紧跟一个要打印的数据项,不能打印多个数据项
【答案】B
2.编一程序根据上网时间计算上网费用,同时为了鼓励多上网,每月收费最多不超过150元。
计算的方法如下:
PrivateSubForm_click()a=Val(InputBox("请输入上网所用的时间!
"))(34)
Print"上网所用费用:
30元!
"(35)
r=a*3Print"上网所用费用:
";rElseIfa>=50Then(36)
Ifr>150ThenPrint"上网所用费用:
150"ElsePrint"上网所用费用:
";rEndIfEndIfEndSub
34、此处应填入的语句为()。
A、Ifa<10Then
B、Ifa>10ThenC、Ifa<=10Then
D、Ifa>=10Then【答案】A
35、此处应填入的语句为()。
A、Ifa>50Then
B、ElseIfa>50ThenC、Ifa<50ThenD、ElseIfa<50Then
【答案】D
36、此处应填入的语句为()。
A、r=a*3B、r=a*2.5C、r=150
D、r=30
【答案】B
3.输入N个数到数组中,找出其中绝对值最小的数和绝对值最大的数,并将两者互换位置。
PrivateSubForm_Click()
Dima()AsInteger
Dimn%,i%,j%,k%,t%,m%
n=InputBox("输入数据的个数:
")
ReDima(1Ton)
Fori=1Ton
a(i)=InputBox("请输入数组元素的值")
Nexti
k=1
Forj=2Ton
IfAbs(a(k))>Abs(a(j))Thenk=j
Nextj
t=1
Forj=2Ton
(39)
Nextj
m=a(t)
(40)
a(k)=m
Print"交换后数组的值:
";
Fori=1Ton
Printa(i);"";
Nexti
Print
EndSub
37、语句Dimn%,i%,j%,k%,t%,m%表示申明的变量类型是
A、变体型
B、整型
C、单精度浮点型
D、双精度浮点型
【答案】B
38、关于语句ReDim说法正确的是()。
A、ReDim可以改变数组的维数
B、ReDim可以多次使用来改变数组的大小
C、ReDim可以在过程外使用
D、使用ReDim语句时需事先申明数组的维数
【答案】B
39、此处应填入的语句为()。
A、IfAbs(a(t))>Abs(a(j))Thenj=tB、IfAbs(a(t))Abs(a(j))Thent=j
D、IfAbs(a(t))【答案】D
40、此处应填入的语句为()。
A、m=a(k)B、a(k)=a(t)C、a(t)=a(k)
D、m=a(t)
【答案】C
程序设计
1.编写程序实现,计算1+3+5+7+...+n(n为奇数)的值。
要求用inputbox输入n的值并判断n必须大于等于1而且为奇数,输入错误需用msgbox提示(提示信息“输入有误!
”),输入正确(例如输入99)显示如下图所示:
答案
PrivateSubForm_Click()
DimnAsInteger
DimiAsInteger
DimresultAsInteger
n=Val(InputBox("输入一个数"))
Ifn>=1AndnMod2=1Then
Fori=1TonStep2
result=result+i
Nexti
Print"1+3+5+7+...+"&n;"="&result
Else
MsgBox"输入有误"
EndIf
EndSub
评分标准:
1.正确计算,循环使用无误(4分)
2.正确判断,inputbox和msgbox正确使用(5分)
3.正确输出显示结果(4分)
4.文件存盘(2分)
2.计算素数。
素数是指一个数x除了1和它本身,不能被其他任何整数整除。
程序功能:
程序界面包括三个文本框(一个输入数据,两个输出计算结果)和一个命令按钮。
当在输入文本框中输入一个数字后,例如100,单击命令按钮以后,计算100以内的素数和个数,分别显示在输出文本框中,效果如下图所示:
提示:
在文本框中的多行显示需设置文本框的MultiLine属性
答案
在单击窗体的事件过程中添加代码,程序代码如下:
PrivateSubCommand1_Click()
DimnAsInteger
Text2.Text=""
n=Val(Text1.Text)
Dimi,j,k,a()AsInteger
ReDima(n)
Fori=0Ton-l
a(i)=i
Nexti
Fori=2ToSqr(n)
Forj=i+1Ton
Ifa(i)<>0Anda(j)<>0Then
Ifa(j)Moda(i)=0Thena(j)=0
EndIf
Nextj
Nexti
Fori=2Ton-1
Ifa(i)<>0Then
Text2.Text=Text2.Text&a(i)&""
k=k+1
EndIf
Nexti
Text3.Text=k
EndSub
评分标准:
1.正确给数组赋值(5分)
2.正确判断素数(7分)
3.正确输出显示结果(5分)
4.文件存盘,程序结构合理、清晰(4分)
5.正确设计界面(4分)
注意:
该题也可以不用数组实现,若没有使用数组则评分标准1酌情给分