计算机二级VB第一单元.docx
《计算机二级VB第一单元.docx》由会员分享，可在线阅读，更多相关《计算机二级VB第一单元.docx（23页珍藏版）》请在冰豆网上搜索。
计算机二级VB第一单元
计算机二级VB
1.树是结点的集合，它的根结点数目是（）
A.有且只有1B.1或多于1
C.0或1D.至少2
2.在设计程序时，应采纳的原则之一（）
A.不限制goto语句的使用B.减少或取消注解行
C.程序越短越好D.程序结构应有助于读者理解
3.下列叙述中，不属于软件需求规格说明书的作用的是（）
A.便于用户、开发人员进行理解和交流
B.反映出用户问题的结构，可以作为软件开发工作的基础和依据
C.作为确认测试和验收的依据
D.便于开发人员进行需求分析
4.单个用户使用的数据视图的描述称为（）
A.外模式B.概念模式
C.内模式D.存储模式
5.SQL语言又称为（）
A.结构化定义语言B.结构化控制语言
C.结构化查询语言D.结构化操纵语言
6.若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是（）
A.bdgcefhaB.gdbecfha
C.bdgaechfD.gdbehfca
7.软件工程的理论和技术性研究的内容主要包括软件开发技术和（）
A.消除软件危机B.软件工程管理
C.程序设计自动化D.实现软件可重用
8.在软件测试设计中，软件测试的主要目的是（）
A.实验性运行软件B.证明软件正确
C.找出软件中全部错误D.发现软件错误而执行程序
9.索引属于（）
A.模式B.内模式
C.外模式D.概念模式
10.数据库系统的核心是（）
A.数据库B.数据库管理系统
C.模拟模型D.软件工程
11.激活菜单栏的快捷键是（）
A.F10
B.F4
C.F5
D.Ctrl
12.VisualBasic集成的主窗口中不包括（）
A.属性窗口
B.标题栏
C.菜单栏
D.工具栏
13.下列说法错误的是（）
A.方法是对象的一部分
B.在调用方法时，对象名是不可缺少的
C.方法是一种特殊的过程和函数
D.方法的调用格式和对象属性的使用格式相同
14.如果要将窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的哪一个属性？
（）
A.Value
B.Visible
C.Enabled
D.Default
15.能够获得一个文本框中被选取文本的内容的属性是（）
A.Text
B.Length
C.Seltext
D.SelStart
16.建立一个新的标准模块，应该选择哪个菜单下的“添加模块”命令？
（）
A.“工程”菜单
B.“文件”菜单
C.“工具”菜单
D.“编辑”菜单
17.下列语句的输出结果为（）
PrintFormat＄（5689.36,″000,000.000″）
A.5,689.36
B.5,689.360
C.5,689.3
D.005,689.360
18.设有数组定义语句：
Dima（5）AsInteger,List1为列表框控件。
下列给数组元素赋值的语句错误的是
（）
A.a（3）=3
B.a（3）=inputbox（″inputdata″）
C.a（3）=List1.ListIndex
D.a=Array（1,2,3,4,5,6）
19.下列各种形式的循环中，输出“*”的个数最少的循环是（）
A.a=5：
b=8
B.a=5：
b=8
DoDO
Print″*″Print″*″
a=a+1a=a+1
LoopWhileaC.a=5：
b=8
D.a=5：
b=8
DoUntila-bDOUntila>b
Print″*″Print″*″
b=b+1a=a+1
LoopLoop
20.下列有关子菜单的说法中，错误的是（）
A.除了Click事件之外，菜单项不可以响应其他事件
B.每个菜单项都是一个控件，与其他控件一样也有其属性和事件
C.菜单项的索引号必须从1开始
D.菜单的索引号可以不连续
21.当在滚动条内拖动滚动块时触发（）
A.KeyUp事件
B.keyPress事件
C.Scroll事件
D.Change事件
22.设有声明语句（）
Dimb（-1To10,2To9,20）AsInteger
则数组b中全部元素的个数
A.2310
B.2016
C.1500
D.1658
23.设在窗体上有个文本框，然后编写如下的事件过程：
PrivateSubText1_KeyDown（KeyCodeAsInteger,ShiftAsinteger）
ConstAlt=4
ConstKey_F2=&H71
altdown%=（ShiftAndAlt）>0
f2down%=（KeyCode=Key_F2）
IfaItdown%Andf2down%Then
Text1.Text=″BBBBB″
EndIf
EndSub
上述程序运行后，如果按【Shift+F2】，则在文本框中显示得是（）
A.Alt+F2
B.BBBBB
C.随机出几个数
D.文本框平均内容无变化
24.设已经在“菜单编辑器”中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是（）
A.PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,_
XAsSingle,YAsSingle）
IfButton=2ThenPopupMenuBs,2
EndSub
B.PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,_
XAsSingle,YAsSingle）
PopupMenuBs
EndSub
C.PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,_
XAsSingle,YAsSingle）
PopupMenuBs,0
EndSub
D.PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,_
XAsSingle,YAsSingle）
If（Button=vbLeftButton）Or（Button=vbRightButton）ThenPopupMenuBs
EndSub
25.下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按Cancel键退出对话框，则（）
PrivateSubCommand1_Click（）
CommonDialog1.CancelError=true
CommonDialog1.flags=cdlCFEffectsOrcdlDFBoth
CommonDialog1.Action=4
CommonDialog1.ShowFont
Text1.Font.Name=CommonDialog1.FontName
Text1.Font.Size=CommonDialog1.fontSize
Text1.Font.Bold=CommonDialog1.FontBold
Text1.Font.Italic=CommonDialog1.FontItalic
Text1.Font.Underline=CommonDialog1.FontUnderline
Text1.FontStrikethru=CommonDialog1.FontStrikethru
Text1.ForeColor=CommmonDialog1.Color
EndSub
A.Text1的字体不发生变化
B.Text1的字体发生变化
C.Text1的字体和颜色发生变化
D.程序出错！
26.要将名为MyForm的窗体显示出来，正确的使用方法是（）
A.MyForm.Show
B.Show.MyForm
C.MyFormLoad
D.MyFormShow
27.下列程序段的执行结果为（）
a=5
Fork=1To0
a=a+k
Nextk
Printk;a
A.-16
B.-116
C.15
D.1121
28.下列程序段的执行结果为（）
a=3
b=1
ForI=1To3
f=a+b
a=b
b=f
Printf
NextI
A.436
B.459
C.634
D.728
29.下列程序段的执行结果为（）
I=9
x=5
Do
I=I+1
x=x+2
LoopUntilI>=7
Print″I=″;I
Print″x=″;x
A.I=4x=5
B.I=7x=15
C.I=6x=8
D.I=10x=7
30.以下程序段运行时从键盘上输入字符“-”，则输出结果为（）
op＄=InputBox（″op=″）
Ifop＄=″+″Thena=a+2
Ifop＄=″-″Thena=a-2
Printa
A.2
B.-2
C.0
D.+2
31.以下程序段的输出结果为（）
DimI,a（10）,p（3）
k=5
Fori=0To10
a（i）=i
Nexti
Fori=0To2
p（i）=a（i*（i+1））
Nexti
Fori=0To2
k=k+p（i）*2
Nexti
Printk
A.20
B.21
C.56
D.32
32.下列程序的执行结果为（）
PrivateSubCommand1_Click（）
DimxAsInteger,yAsInteger
x=12:
y=20
CallValue（x,y）
Printx;y
EndSub
PrivateSubValue（ByValmAsInteger,ByValnAsInteger）
m=m*2:
n=n-5
Printm;n
EndSub
A.2012B.1220
20151225
C.2415D.2412
12201215
33.在窗体上画一个命令按钮，然后编写下列程序PrivateSubCommand3_Click（）
Tcl2
Tcl3
Tcl4
EndSub
SubTcl（aAsInteger）
StaticxAsInteger
x=x+a
Printx;
升级会员 