09年VBWord格式文档下载.docx
- 文档编号:16657605
- 上传时间:2022-11-25
- 格式:DOCX
- 页数:13
- 大小:21.54KB
09年VBWord格式文档下载.docx
《09年VBWord格式文档下载.docx》由会员分享,可在线阅读,更多相关《09年VBWord格式文档下载.docx(13页珍藏版)》请在冰豆网上搜索。
(12)把数学表达式(5x+3)/(2y-6)表示为正确的VB表达式应该是:
d
A)
(5x+3)/(2y-6)
B)x*5+3/2*y-6
C)(5*X+3)
D)(X*5+3)/(y*2-6)
(13)下面有关标准模块的叙述中,错误的是:
a
A)标准模块不完全由代码组成,还可以有窗体。
B)标准模块中的Private过程中不能被工程中的其他模块调用。
C)标准模块中文件扩展名为.bas
D)标准模块中的全局变量可以被工程中的任何模块引用。
(14)下面控件中,没有Caption
属性的是c
A)复选框
B)单选按钮
C)组合框
D)框架
(15)用来设置文字字体是否斜体的属性是:
A)FonUnderline
B)FontBold
C)Fontslope
D)FontItalic
(16)若看到程序中有以下事件过程,则可以肯定的是,当程序运行时b
Private
Sub
Form_MouseDown(Button
As
Integer,
Shift
X
Single,
Y
Single)
"
VB
program"
End
Sub
用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程。
B)
用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程。
用鼠标右键单击名称为“MouseDown”的命令按钮时,执行此过程。
用鼠标左键或右键单击名称为“Click”的控件时,执行此过程。
(17)可以产生30-50(含30和50)之间的随机整数的表达式是a
A)Int
(Rnd*21+30)
B)Int(Rnd*20+30)
Int(Rnd*50-Rnd*30)
D)Int(Rnd*20+50)
(18)在程序运行时,下面的叙述中正确的是c
A)用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_load事件过程。
B)用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程。
C)只装入而不显示窗体,也会执行窗体的Form_Load事件过程。
D)装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程。
(19)名称为Command1的命令按钮和名称为Text1的文本框b
Command1_Click()
Text1.Text
=
程序设计"
Text1.SetFocus
Text1_GotFocus()
等级考试"
运行以上程序,单击命令按钮后:
文本框中显示的是“程序设计”,且焦点在文本框中。
文本框中显示的是“等级考试”,且焦点在文本框中。
文本框中显示的是“程序设计”,且焦点在命令按钮上。
文本框中显示的是“等级考试”,且焦点在命令按钮上。
(20)有名称为Opiton1的单选按钮,且程序中有语句:
If
Option1.value=True
then
下面语句中与该语句不等价的是c
Option1.Vulue
then
B)If
Option1=True
C)If
value=True
D)If
Option
(21)设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。
下面叙述中正确的是:
A)程序运行时,若使滚动块向左移动,滚动条胡value属性值就增加。
B)程序运行时,若使滚动块向左移动,滚动条的value属性值就减少。
C)由于滚动条的MAX属性值小于Min属性值,程序会出错。
D)由于滚动条的Max属性值小于Min属性值,程序运行时滚动条的长度会缩为滚动块无法移动。
(22)有如下过程代码
连续3次调用var_dim过程,第3次调用时的输出是:
2
1
B)2
3
6
3
(23)在窗体上画1个命令按钮,并编写如下事件过程:
运行程序,单击命令按钮,窗体上显示的内容为:
5
B)5
4
C)4
D)4
1
(24)在窗体上面1个命令按钮,并编写如下事件过程:
Dim
a(3,
3)
For
m
To
n
Or
-
Then
a(m,
n)
+
n
Else
If
n);
Next
m
运行程序单击命令按钮,窗体上显示的内容为:
0
C)2
5
6
(25)设有以下函数过程:
Function
fun(a
b
Integer)
c
Integer
a
<
a:
b:
Do
Loop
Until
Mod
fun
Function
若调用函数fun时的实际参数都是自然数,则函数返回的是:
b
A)a、b的最大公约数
B)a、b的最小公约数
C)a除以b的余数
)a除以b
的商的整数部分
(26)窗体上有1个名称为text1文本框,1个名称为Timer1的计时器控件,其Iterval属性值为5000,Enabled属性值是True。
Timer1的事件过程如下:
Timer1_Timer()
Static
flag
Then
-flag
Text1.ForeColor
&
HFF&
'
为红色'
HC000&
为绿色'
以下叙述中正确的是
每次执行此事件过程时,flag的初始值均为0
Flag的值只可能取0或1
程序执行后,文本框中的文字每5秒改变一次颜色
程序有逻辑错误,Else分支总也不能被执行
(27)为计算1+2+2^2+2^3+2^4+…+2^10的值,并把结果显示在文本框text1中,若编写如下事件过程:
a%,
s%,
k%
s
2
k
10
*
k
s
执行此事件过程中发现结果是错误的,为能够得到正确结果,应做的修改是:
把s=1
改为
s=0
B)把For
k=2
to
10
k=1
C)交换语句
s=s+a和a=a*2的顺序
D)同时进行B)、C)两种修改
(28)标准模块中有如下程序代码:
Public
x
y
var_pub()
10:
20
在窗体上有1个命令按钮,并有如下事件过程:
Command
1_Click()
Call
var_pub
100
x,
y
运行程序后单击命令按钮,窗体上显示的是:
A)100
100
B)100
120
C)110
D)110
120
(29)设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:
Funciton
as
Integer
b
)
While
>
Wend
在调试时发现函数是错误的,为使函数能产生正确的返回值,应做的修改是:
A)把a=a-b改为a=b-a
B)把a=a-b改为a=a\b
C)把while
a>
b改为
while
a<
把while
=b
(30)下列关于通用对话框CommanDialog1的叙述中,错误的是a
A)只要在“打开”对话框中选择了文件,并单击“打开”按钮,就可以将选中的文件打开。
B)使用CommonDialog1.showcolor方法,可以显示“颜色”对话框。
C)Cancelerror属性用于控制用户单击“取消”按钮关闭对话框时,是否显示出错警告。
D)在显示“字体”对话框前,必须先设置CommonDialog1.showcolor的Flags属性,否则会出错。
(31)在利用菜单编辑器设计菜单时,为了把组合键”Alt+X”设置为"退出(X)
菜单项的访问键,可以将该菜单项的标题设置为c
A)退出(X&
)
B)退出(&
X)
C)退出(X#)
D)退出(#X)
(32)在窗体上画1个命令按钮和1个文本框,其名称分别为command1和text1,再编写如下程序:
ss
String
text1_keypress(keyascii
Chr(keyascii)
Chr(keyascii)
String,
i
Len(ss)
Step
-1
Mid(ss,
i,
1)
Next
(33)窗体的左右两端各有1条直线,名称分别为Line1、Line2;
名称为shape1的圆靠在左边的Line1直线上(见图);
另有1个名称为Timer1的计时器控件,其Enabed属性值是True。
要求程序运行后,圆每秒向右称动100,当圆遇到Line2时则停此移动。
为实现上述功能,某人把计时器的Interval属性设置为1000,并编写了如下程序:
Line1.X1
Line2.X1
Shape1.Left
Shape1.Width
运行程序时发现圆立即移动了右边的直线处,与题目要求的移动方式不符。
为得到与题目要求相符的结果,下面修改方案中正确的是:
把计时器的Interval属性设置为1
把For
K=Line1.X1
100和Next
两行删除
100改为For
K=Line2.X1
把
shape1.left+shape1.width<
line2.x1
改为if
shape1.left<
(34)下列有关文件的叙述中,正确的是:
A)以Output方式打开一个不存在的文件时,系统将显示出错信息
以Append方式打开的文件,既可以进行读操作,也可以进行写操作
C)在随机文件中,每个记录的长度是固定的。
D)无论是顺序文件还是随机文件,其打开的语句和打开方式都是完全相同的。
(35)窗体如图1所示,要求程序运行时,在文本框text1中输入一个姓氏,单击“删除“按钮(名称为command1),则可删除列表框中list1中所有该姓氏的项目,若编写以下程序来实现此功能:
n%,
Len(Text1.Text)
List1.ListCount
Left(List1.List(k),
List1.RemoveItem
在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”则只删除了“刘邦”、“刘备”2项,结果如图2所示。
这说明程序不能适应所有情况,需要修改。
正确的改方案是把
k=0
list1.listcount-1改为
k=list1.listcount-1
step
list1.listcount
list1.listcount-1
二、
填空题(每空2分,共30分)
请将每空的正确答案写在答题卡上,答在试卷上不得分
(1)某二叉树有5个度为2的结占以及3个度为1的结点,则该二叉树中共有
14个结点。
(2)程序流程图中的菱形框表示的是【逻辑条件】
(3)软件开发过程主要分为需求分析、设计、编码与测试四个阶段,其中【需求分析】阶段产生软件需求规格说明书。
(4)在数据库中,实体集之间的联系可以是一对一或一对多或多对多的,那么“学生”和“可选课程”的联系为【4】
(5)人员基本信息一般包括:
身份证号、姓名、性别、年龄等。
其中可以作为主关键字的是【5】
(6)工程中有Form1、Form2两个窗体,Form1窗体外观如图1所示,程序运行时在form1中名称为text1的文本框中输入一个值(圆的半径),然后单击命令按钮“计算并显示”(其名称为command1),则显示form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来,如图2所示,如果单击命令按钮时,则文本框中输入的不是数值,则用信息框显示“请输入数值数据!
,请填空:
图1 图2
MsgBox
请输入半径"
ElseIf
Not
IsNumeric(
【6】)
请输入数值数据"
Els
r
Val(【7】)
Form2.Show
【8】.Print"
圆的面积是"
3.14*r*r
(7)设有整型变量s,取值范围为0-100,表示学生的成绩。
有如下程序段:
If
90
Level
A"
75
B"
60
C"
D"
下面用Select
case
结构改写上述程序,使两段程序所实现的功能完全相同,请填空:
Form_Load()
Select
Case
【9】
90
89
74
【10】
【11】
(8)窗体上有名称为command1的命令按钮,事件过程及2个函数过程如下:
z
fy(y)
fx(fx(x)),
fx(ByVal
fx
fy(ByVal
fy
运行程序,并单击命令按钮,则窗体上显示的2个值依次是【12】和【13】.
(9)窗体上有称称为command1的命令按钮及名称为text1,能显不多行文本的文本框,程序运行后,如果单击命令按钮,则可打开磁盘文件c:
\test.txt,并将文件中的内容(多行文本)显示在文本框中,下面是实现此功能的程序,请填空:
Number
FreeFile
Open
c:
\test.txt"
Input
Number
Do
EOF
【14】.
Line
#Number,
text1
Text
text1.Text
【15】
Chr(13)
Chr(10)
Loop
Close
2009年9月二级Visual
Basic
试卷答案
一、选择题:
11-15:
CDACD
16-20:
DACBC
21-25:
ACABB
26-30:
CDDDA
31-35:
CDBCA
二、填空题
1、14
2、逻辑条件
3、需求分析
4、多对多
5、身份证号
6、Text1.Text
7、Text1.Text
8、Form2
9\、Is
10、Else
11、End
Select
12、12
13、10
14、Number
15、S
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 09 VB