VB程序设计考试试卷

VB试卷
一、单项选择，请选择正确答案填入括号内。

（共10题，每题2分，共20分）
1．在VB中，被称为对象的是_______。

（）A．窗体B．控件C．控件和窗体D．窗体、控件和属性
2．Visual Basic是一种具有良好图形用户界面的程序设计语言，图形用户界面的英文缩写为
（）A．CGI B．GCU C．GUI D．CUI
3．Visual Basic采用了_____编程机制。

（）A．面向过程B．面向对象C．事件过程D．可视化
4．”-32768”的数据类型是_______。

（）A．整型常量B．字符串型常量C．浮点型常量D．符号型常量5．在VB中，要强制用户对所用的变量进行显式声明，可以在______中设置。

（）A．“属性”对话框B．“程序代码”窗口C．“选项”对话框D．对象浏览器6．以下能在窗体Form1的标题栏中显示”VisualBasic窗体”的语句是_____。

（）A．=“VisualBasic窗体”B．Form1.Title=“VisualBasic窗体”C．Form1.Caption=“VisualBasic窗体”D．Form1.Text=“VisualBasic窗体”7．下列数据库访问接口最先进的是_____。

（）A．ADO B．DAO C．RAO D．ODBC
8．ADO对象模型中，以下_____对象是建立与数据库的连接。

（）A．Command B．Connection C．RecordSet D．Felid
9．ADO对象模型中，以下_____对象是用于对数据表进行操作。

（）A．Command B．Connection C．RecordSet D．Felid 10．RecordSet对象中的_____方法用于删除当前记录。

（）A．Edit（）B．AddNew（）C．Delete（）D．update（）
二、填空题。

（每空3分，共24分）
1．下列语句的输出结果为：____________________。

Print(round(5689.361584,2)
2．下列程序的功能是：当x<50时，y=0.8x；当50<=x<=100时，y=0.7x；当x>100时，没有意义。

请填空。

Private Sub Command1_Click()
Dim x as Single
x=InputBox“输入x的值”
__________________________
Case Is<50
y=0.8*x
Case_______________________
y=0.7*x
___________________________
Print“输入的数据出界”
End select
Print x,y
End Sub
3．以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输入最高分和最低分，当输入负数时结束输入，输出结果。

请补充程序。

Dim x,amax,amin as Single
x=inputbox(“Enter a score”)
amax=x
amin=x
do while__________________
if x>amax then
amax=x
end if
if_________________then
amin=x
end if
x=inputbox(“Enter a score”)
loop
print“max=”;amax,”min”;amin
4．下面程序的功能是：输出100以内能被3整除且个位数为6的所有整数。

For i=0________________________
j=i*10+6
if___________________________then
print j
end if
next i
三、思考题。

（28分）
1．什么是对象？什么是对象的属性、事件和方法？（8分）
2．VB定义了哪些数据类型，对应的英文单词是什么？（12分）
3．设A=7，B=3，C=4，求下列表达式的值：（8分）
（1）A+3*C
（2）A^2\6
（3）A/2*3/2
（4）A Mod3+B^3/C\5
四、程序题。

（28分）
1．x,y关系如下，设计程序，输入x，可计算出y的值。

(8分)
y={1+x(x>=0)|1–2x(x<0)}
2．编写一个程序，程序能够实现成绩分类显示。

显示要求如下：（10分）（1）当成绩为：90—100时，显示“优+”
（2）当成绩为：80—89时，显示“优”
（3）当成绩为：70—79时，显示“良”
（4）当成绩为：60—69时，显示“合格”
（5）当成绩为：0—59时，显示“不合格”
3．求1—100所有奇数的和与偶数的和。

（10分）。