vb第1次测验复习题单选判断程序填空改错练习.docx
- 文档编号:3327863
- 上传时间:2023-05-05
- 格式:DOCX
- 页数:37
- 大小:23.17KB
vb第1次测验复习题单选判断程序填空改错练习.docx
《vb第1次测验复习题单选判断程序填空改错练习.docx》由会员分享,可在线阅读,更多相关《vb第1次测验复习题单选判断程序填空改错练习.docx(37页珍藏版)》请在冰点文库上搜索。
vb第1次测验复习题单选判断程序填空改错练习
一、判断共19题(共计19分)
第1题(1.0分)题号:
684
在窗体的form_load事件过程里定义的变量是局部变量。
第2题(1.0分)题号:
380
VB规定窗体文件的扩展名是.vbp。
3题(1.0分)题号:
681
对于动态数组,在过程中可多次使用redim语句改变数组的大小。
第4题(1.0分)题号:
285
所有的控件在程序运行以后都是可见的。
第5题(1.0分)题号:
677
通常用show方法来显示通用对话框
第6题(1.0分)题号:
683
控件数组中的各个元素由caption属性区分。
第7题(1.0分)题号:
680
通用对话框控件在运行的时候,是不可见的。
第8题(1.0分)题号:
361
设A=3,B=4,C=5,D=6,则表达式A>BAndC<=DOr2*A>C
的值是False。
第9题(1.0分)题号:
313
“菜单编辑器”中至少要填“名称”和“标题”这两个框,才
能真确完成菜单栏的设计。
第10题(1.0分)题号:
325
VB若同一个工程有许多窗体,可以指定任一窗体为启始窗体。
第11题(1.0分)题号:
335
通过改变属性窗口中的Name属性,可以改变窗体上显示的标题。
第12题(1.0分)题号:
324
如果一个菜单项的Visible属性为False,则它的子菜单也不会显示。
第13题(1.0分)题号:
678
鼠标mousedown事件可以返回一个参数button用于判断用户按下的是鼠标的左键、右键、还是滑轮。
第14题(1.0分)题号:
254
有的对象属性既可在属性窗口中设定又可在程序代码中设定。
第15题(1.0分)题号:
686
时钟控件的interval属性的单位是毫秒。
第16题(1.0分)题号:
248
对象的可见性用enabled属性设置,可用性用visible属性设置。
第17题(1.0分)题号:
682
Dim(4,5)定义数组元素个数是20个。
第18题(1.0分)题号:
685
dima(1to5)定义的数组是2维数组。
第19题(1.0分)题号:
679
用户可以通过设置菜单项的hide属性值为false来使该菜单项失效。
二、单项选择共46题(共计46分)
第1题(1.0分)题号:
1044
双击窗体的任何地方,可以打开的窗口是()。
A:
代码窗口
B:
属性窗口
C:
工程管理窗口
D:
以上3个选项都不对
第2题(1.0分)题号:
1071
VB认为下面()组变量是同一个变量。
A:
A1和a1
B:
SUM和SUMMARY
C:
AVER和AVERAGE
D:
A1和A_1
第3题(1.0分)题号:
1118
决定控件上文字的字体、字形、大小及效果的属性是()。
A:
TEXT
B:
CAPTION
C:
NAME
D:
FONT
第4题(1.0分)题号:
1013
下列()是窗体的扩展名。
A:
frm
B:
bas
C:
cls
D:
dll
第5题(1.0分)题号:
2298
关于VB源代码的编写,下列说法错误的是
A:
一个语句必须写在一行中,不可分成多行来书写
B:
同一行可以写多个语句
C:
可以适当添加注释有利于程序的维护和调试
D:
VB源代码中不区分字母的大小写
第6题(1.0分)题号:
2313
如果在窗体上画一个命令按钮Command1,然后编写如下实事件代码:
PrivateSubCommand1_Click()
x=2
Fori=1To10Step2
x=x+i
Nexti
Printx
EndSub
那么,程序运行后,单击命令按钮,其窗体上显示的结果是
A:
26
B:
27
C:
38
D:
57
第7题(1.0分)题号:
2304
使"程序设计"在当前窗体上输出的语句是
A:
Print"程序设计"
B:
Picture1.Print"程序设计"
C:
Printer.Print"程序设计"
D:
Text.Print"程序设计"
第8题(1.0分)题号:
724
下面()是合法的变量名.
A:
X_yz
B:
123abc
C:
integer
D:
X-Y
第9题(1.0分)题号:
1006
以下关于vb语言的说法中,正确的是()。
A:
vb是一种面向过程的语言
B:
vb是一种面向对象语言
C:
vb是一种低级语言
D:
vb是一种机器语言
第10题(1.0分)题号:
1052
设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,
则另一个命令按钮的名称不能是()。
A:
cmdc
B:
cmdb
C:
cmdA
D:
Command1
第11题(1.0分)题号:
736
下面正确的赋值语句是().
A:
x+y=30
B:
y=*r*r
C:
y=x+30
D:
3y=x
第12题(1.0分)题号:
995
要想清除文本框中的内容则可利用()进行。
A:
Caption
B:
Text
C:
Clear
D:
Cls
第13题(1.0分)题号:
1068
MSGBOX函数中有4个参数,其中必须写明的参数是()。
A:
指定对话框中显示按钮的数目
B:
设置对话框标题
C:
提示信息
D:
所有参数都是可选的
第14题(1.0分)题号:
727
下面()是合法的单精度型变量
A:
num!
B:
sum%
C:
xinte$
D:
mm#
第15题(1.0分)题号:
2301
用InputBox()函数设计的对话框,其功能是
A:
只能接收用户输入的数据,但不会返回任何信息
B:
能接收用户输入的数据,并能返回用户输入的信息
C:
既能用于接收用户输入的信息,又能用于输出信息
D:
专门用于输出信息
第16题(1.0分)题号:
961
将命令按钮Command1设置为不可见,应修改该命令按钮的()属性。
A:
Visible
B:
Value
C:
Caption
D:
Enabled
第17题(1.0分)题号:
1176
执行下面的程序段后,x的值为()。
x=5
Fori=1To20Step2
x=x+i\5
Nexti
A:
21
B:
22
C:
23
D:
24
第18题(1.0分)题号:
967
由Fork=10to0step3:
nextk循环语句控制的循环次数是()。
A:
12
B:
0
C:
-11
D:
-10
第19题(1.0分)题号:
2309
Do循环语句是根据条件决定循环的语句的,下列说法正确的是
A:
While和Until都是在条件变为真的之前重复循环
B:
Until是当条件为真时执行循环,而While是在条件变为真的之前重复
C:
While和Until都是当条件为真时执行循环
D:
While是当条件为真时执行循环,而Until是在条件变为真的之前重复
第20题(1.0分)题号:
1177
用语句DimA(-3To5)AsInteger定义的数组的元素个数是()。
A:
6
B:
7
C:
8
D:
9
第21题(1.0分)题号:
2307
以下Case语句中错误的是
A:
Case0To10
B:
CaseIs>10
C:
Case3,5,Is>10
D:
CaseIs>10AndIs<50
第22题(1.0分)题号:
2303
可以实现从键盘输入一个作为双精度变量a的值的语句是
A:
a=InputBox()
B:
a=InputBox("请输入一个值")
C:
a=Val(InputBox("请输入一个值"))
D:
a=Val(InputBox())
第23题(1.0分)题号:
1092
窗体的Caption属性的作用是()。
A:
确定窗体的名称
B:
确定窗体的标题
C:
确定窗体的边界类型
D:
确定窗体的字体
第24题(1.0分)题号:
933
函数Int(10*Rnd)是在()范围内的整数。
A:
[0,1]
B:
[1,10]
C:
[1,9]
D:
[0,9]
第25题(1.0分)题号:
1128
以下()程序段可以实施X、Y变量值的变换。
A:
Y=X:
X=Y
B:
Z=X:
Y=Z:
X=Y
C:
Z=X:
X=Y:
Y=Z
D:
Z=X:
W=Y:
Y=Z:
X=Y
第26题(1.0分)题号:
939
循环结构ForI%=-1to–17Step–2共执行()次。
A:
5
B:
6
C:
8
D:
9
第27题(1.0分)题号:
1022
下面()是日期型常量。
A:
"12/19/99"
B:
12/19/99
C:
#12/19/99#
D:
{12/19/99}
第28题(1.0分)题号:
742
VB提供了结构化程序调计的三种基本结构,三种基本结构是().
A:
递归结构、选择结构、循环结构
B:
选择结构、过程结构、顺序结构
C:
过程结构、输入输出结构、转向结构
D:
选择结构、循环结构、顺序结构
第29题(1.0分)题号:
1055
表达式Mid("SHANGHAI",6,3)的值是()。
A:
SHANGH
B:
SHA
C:
ANGH
D:
HAI
第30题(1.0分)题号:
705
有程序代码如下:
Text.Text="Text1.text"则Text1、Text、"Text1.text"分别代表.
A:
对象、值、属性
B:
对象、方法、属性
C:
对象,属性、值
D:
属性、对象、值
第31题(1.0分)题号:
1172
表达式4+5\6*7/8Mod9的值是()。
A:
4
B:
5
C:
6
D:
7
第32题(1.0分)题号:
740
语句:
Print"Sqr(9)=";Sqr(9)的输出结果是().
A:
Sqr(9)=Sqr(9)
B:
Sqr(9)=3
C:
"3"=3
D:
3=Sqr(9)
第33题(1.0分)题号:
739
赋值语句:
a=123&Mid("123456",3,2)执行后,a变量中的值是().
A:
"12334"
B:
123
C:
12334
D:
157
第34题(1.0分)题号:
2312
执行语句Fori=1to3:
i=i+1:
Nexti后变量i的值是
A:
3
B:
4
C:
5
D:
6
第35题(1.0分)题号:
703
在VisualBasic中最基本的对象是(),它是应用程序的基石,是其他控件的容器.
A:
文本框
B:
命令按钮
C:
窗体
D:
标签
第36题(1.0分)题号:
2310
关于Do……LoopUntil循环正确的描述是
A:
不论"条件表达式"是否为"真",至少要执行一次循环体
B:
如果"条件表达式"的值为假,则一次循环体也不执行
C:
如果"条件表达式"的值为真,则一次循环体也不执行
D:
如果"条件表达式"的值为真,则要继续执行循环体
第37题(1.0分)题号:
2302
在默认情况下,InputBox()函数返回值的类型为
A:
逻辑类型
B:
字符串型
C:
数值型
D:
变体类型
第38题(1.0分)题号:
735
表达式Len("123程序设计ABC")的值是().
A:
10
B:
14
C:
20
D:
17
第39题(1.0分)题号:
2308
下面程序段执行结果为()x=Int(Rnd()+3)
SelectCasex
Case5
Print"优秀"
Case4
Print"良好"
Case3
Print"及格"
CaseElse
Print"不及格"
EndSelect
A:
优秀
B:
良好
C:
及格
D:
不及格
第40题(1.0分)题号:
960
要改变控件的宽度,应修改该控件的()属性。
A:
Top
B:
Width
C:
Left
D:
Height
第41题(1.0分)题号:
1087
在一个语句行内写多条语句时,语句之间应该用()分隔。
A:
逗号
B:
分号
C:
顿号
D:
冒号
第42题(1.0分)题号:
2311
执行下列程序段输出结果是()x%=2
Dowhilex<8
Print"*";
x=x+4
Loop
A:
*
B:
**
C:
***
D:
****
第43题(1.0分)题号:
729
数学表达式3≤x<10在VB中的逻辑表达式为().
A:
3<=x<10
B:
3<=xANDx<10
C:
x>=3ORx<10
D:
3<=xAND<10
第44题(1.0分)题号:
2299
以下说法错误的是
A:
注释语句用来对程序或程序中某些语句做注释,使程序便于理解
B:
注释语句是非执行语句
C:
任何字符都可以放在注释行中作为注释内容
D:
注释语句不能放在执行语句的后面
第45题(1.0分)题号:
936
改变控件在窗体中的上下位置应修改控件的()属性。
A:
Top
B:
Left
C:
Wide
D:
Height
第46题(1.0分)题号:
1007
下列的逻辑表达式中不正确的是()。
A:
A B: X C: 1>2AND3>1 D: X>YAND1=2 三、程序填空共9题(共计90分) 第1题(10.0分)题号: 526 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '题目: 在窗体上建立两个文本框Text1(输入数)及Text2(显示结果), '一个命令按钮Command1("判断")。 单击按钮时判断Text1中输入的数值 '是否是4的倍数。 '请在【】处填入正确的内容 '------------------------------------------------------- 'PrivateSubCommand1_Click() DimxAsInteger '**********SPACE********** IfIsNumeric(Text1.Text)=【? 】Then Text2.Text="输入错误" ExitSub EndIf '**********SPACE********** x=val(【? 】) '**********SPACE********** If【? 】=0Then Text2.Text="是4的倍数" Else Text2.Text="不是4的倍数" EndIf EndSub 答案: 1).False 2).Text1.Text或Text1 3).xMod4 第2题(10.0分)题号: 527 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '题目: 窗体上建立了一个文本框Text1,用于显示结果。 单击按钮弹出输入对话框录入0-6之间的数值,判断输入值为星期几。 请在【】处填入正确的内容 '------------------------------------------------------- PrivateSubCommand1_Click() DimxAsInteger '**********SPACE********** x=Val(【? 】("请输入星期几(0~6)")) '**********SPACE********** SelectCase【? 】 CaseIs=0 Text1.Text="星期日(Sunday)" CaseIs=1 Text1.Text="星期一(Monday)" CaseIs=2 Text1.Text="星期二(Tuesday)" CaseIs=3 Text1.Text="星期三(Wednesday)" CaseIs=4 Text1.Text="星期四(Thursday)" CaseIs=5 Text1.Text="星期五(Friday)" CaseIs=6 Text1.Text="星期六(Saturday)" '**********SPACE********** Case【? 】 Text1.Text="输入错误" EndSelect EndSub 答案: 1).InputBox 2).x 3).Else 第3题(10.0分)题号: 519 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '题目: 该程序通过For循环计算一个表达式的值,这个表达式是 '1/2+2/3+3/4+4/5 '请在【】处填入正确的内容 '------------------------------------------------------- PrivateSubCommand1_Click() '**********SPACE********** Dim【? 】AsDouble,xAsDouble DimnAsLong DimiAsInteger '**********SPACE********** sum=【? 】 n=0 Fori=1To5 x=n/i n=n+1 '**********SPACE********** sum=【? 】 Next Form1.Printsum EndSub 答案: 1).sum 2).0 3).sum+x或x+sum 第4题(10.0分)题号: 524 OptionExplicit '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '题目: 下面是一个体操评分程序,10位评委,除去一个最 '高分和一个最低分,计算平均分(设满分为10分)。 '请在【】处填入正确的内容 '------------------------------------------------------- 'PrivateSubCommand1_Click() DimsAsInteger DimMax,MinAsInteger Dimi,n,pAsInteger '**********SPACE********** 【? 】 Min=10 Fori=1To10 n=Val(InputBox("请输入分数: ")) '**********SPACE********** Ifn>MaxThen【? 】 Ifn s=s+n Nexti '**********SPACE********** s=s-Max【? 】 p=s/8 Print"最高分: ";Max Print"最低分: ";Min Print"最后得分: ";p EndSub 答案: 1).Max=0 2).Max=n 3).-Min 第5题(10.0分)题号: 531 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------ '题目: 打印出100-999之间的所有水仙花数 '如果一个数的百位,十位,个位数的立方和等于这个数本身 '则这个数为水仙花数 '请在【】处填入正确的内容 ------------------------------------------------------- 'PrivateSubCommand1_Click() DimiAsInteger,aAsInteger,bAsInteger,cAsInteger '**********SPACE********** Fori=100To【? 】 '**********SPACE********** a=Int(i/【? 】) b=Int((i-100*a)/10) '**********SPACE********** c=i-100*a-【? 】 Ifa*a*a+b*b*b+c*c*c=iThen Printi EndIf Nexti EndSub 答案: 1).999 2).100 3).10*b或b*10 第6题(10.0分)题号: 41 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '题目: 下面过程max()用于求3个数中最大值,利用这个过程求5 '个数中最大值。 '------------------------------------------------------- PrivateSubForm_Click() Print"5个数34、124、68、73、352的最大值是: " max1=max(34,124,68) '**********SPACE********** max1=【? 】 Printmax1 EndSub '**********SPACE********** PublicFunctionmax(【? 】) Ifa>bThen m=a Else m=b EndIf '**********SPACE********** If【? 】Then max=m Else max=
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 测验 复习题 判断 程序 填空 改错 练习