试卷模板

系______________ 专业班级_______________ 姓名_______________ 学号________________

答 题 不 得 超 过 装 订 线

……………………………………………………………………………………………………………

学院2009—2010学年下学期 系2008级计算机教育班期末考试试卷

面向对象程序设计（B 卷）

一、选择题（40分，每空2分，共20题）

1、在利用VB 环境编程时，下列方式不能退出VB 的是（ ）。

A.使用“文件”菜单中的“退出”命令

B.在标题栏单击鼠标右键，然后选择“关闭”命令

C.按F5键

D.按Alt+Q 键

2、在Visual Basic 中，变量的默认类型是（ ）。

A.Integer

B.Double

C.Currency

D.Variant 3、下列语句不合法的是（ ）。

A. x = 1 : y = 2

B. ? x ; y ;

C. ? x , y ,

D. x = 1; y = 2

4、当x=0时，函数IIf(x > 0, 1, IIf(x < 0, -1, 0))的返回值是（ ）。

A. 0

B. 1

C. -1

D. 出错 5、以下哪个控件不能做为容器控件？（ ）。

A.Form

B.PictureBox

C.Frame

D. Image

6、无论何种控件，共同具有的属性是（ ）。

A .Text

B .Name

C .Caption

D .ForeColor 7、有程序代码如下：

Text1.Text = "Visual Basic 程序设计"则Text1，Text ，和"Visual Basic 程序设计"分别代表（ ）。

A.对象，值，属性

B.对象，方法，属性

C.对象，属性，值

D.属性，对象，值 8、表达式16/4-2^5*8/4MOD5\2（ ）。

A.20

B.14

C.2

D.4

9、要使一个文本框可以显示多行文本，应设置为True 的属性是（ ）。

A.Enabled

B.MultiLine

C.MasLenfth

D.Width 10、如果将文本框的（ ） 属性设置为 True, 则运行时不能对文本框中的内容进行编辑。

A.Locked

B.MultiLine

C.TabStop

D.Visible 11、决定控件上文字的字体、字形、大小、效果的属性是（ ）。 A.Text B.Caption https://www.360docs.net/doc/ed11063999.html, D.Font 12、下列语句合法的是（ ） 。

A. x + y = 2

B. x > 2 = y

C. x = y > 2

D. x = y++ 13、下列赋值语句正确的是（ ） 。

A.a+b=c

B.c=a+b

C.-a=b

D.5=a+b 14、如果x 小于y 的平方，则在窗体上输出"OK"。完成该要求的单行条件语句是

（ ） 。

A. If x < y ^ 2 Then "OK"

B. If x < y ^ 2 Then Show "OK"

C. If x < y ^ 2 Then Print "OK"

D. If x < y ^ 2 Then Put "OK" 15、以下叙述错误的是（ ）。

A. 一个工程中只能有一个Sub Main 过程

B. 窗体的Show 方法将指定的窗体装入内存并显示

C. 窗体的Hide 和Unload 方法作用完全相同

D. 若工程文件中有多个窗体，可以根据需要指定一个启动窗体 16、显示弹出菜单要用（ ）方法实现。

………………………………………………………………………………………………………………

答 题 不 得 超 过 装 订 线

A. Popup

B. PopupMenu

C. ShowMenu

D. DrawMenu 17、下列叙述正确的是（ ）。

A. 菜单是一个控件，也具有属性和事件

B. “菜单编辑器”中设计的菜单不是控件

C. 菜单的属性可以在"属性窗口"中设置

D. 菜单是一个控件，它可以保存在"工具箱"中

18、要在窗体Form1内显示“myfrm ”，使用的语句是（ ）。

A.Form.caption="myfrm"

B.Form1.caption="myfrm"

C.Form1.print "myfrm"

D.Form. print "myfrm" 19、确定一个控件在窗体上位置的属性是（ ）。

A.Width 或Height

B.Width 和Height

C.Top 或Left

D.Top 和Left 20、下列控件中不能响应Click 事件的是（ ）。

A.Frame

https://www.360docs.net/doc/ed11063999.html,bel

C.Timer

D. Form

二、填空题（20分，每题2分，共10题）

1、将数学式 写成VB 表达式。 。

2、Print 方法有 和 的功能。

3、在VB 中将red 声明为常量255，使用的语句是______________________。

4、VB 提供了结构化程序设计的三种基本结构，这三种基本结构是顺序结构、 、 。

5．若用户单击了按钮ABC ，则此时将被执行的事件过程名应为：________________ __________。

6、输出框输出数据的语法格式为：

7、设某个程序中要用到一个二维数组，要求数组名为A ，类型为整型，第一维下

标从-1到2，第二维下标从0到3，则相应数组声明语句为 。

8、过程级变量是指在过程内部声明的变量，只有在该过程中的代码才能访问这个变量。模块级或窗体级变量的作用域是 ，全局变量在整个应用程序中有效，其作用域是 。

9、将命令按钮Command1设置为不可用，应修改该命令按钮的_____________属性。

10、如果要在查询结果中选择所有字段，则不用一一列出字段名，只需写成： 。

三、读程序写结果（12分，每题3分，共

4题）

1、下面程序运行后，单击命令按钮，在两个文本框中显示的值分别为__________。 Private Sub Command1_Click() x=0

Do While x<50 x=(x+2)*(x+3) n=n+1 Loop

Text1.Text=Str(n) Text2.Text=Str(x) End Sub

2、写出程序运行时连续单击三次窗体后，Form1上输出 。

Private Sub Form_Click() Dim x As Integer Static y As Integer

x = x + 2

a

ac

b b 242-+-

系______________ 专业班级_______________ 姓名_______________ 学号________________

答 题 不 得 超 过 装 订 线

……………………………………………………………………………………………………………

y = x + y

Form1.Print "x="; x, "y="; y End Sub

3、窗体Form1上的输出结果是： 。

Private Sub Form_Click()

Dim I As Integer, j As Integer Dim c As Integer c = 0

For I = 1 To 4 For j = 1 To 2 c = c + 4 Next j Next I Print c End Sub

4、程序运行时，单击命令按钮在窗体上的输出结果为： 。

Function F(a As Integer) Dim b As Integer Static c As Integer b = b + 2 c = c + 2 F = a + b + c End Function

Private Sub Command1_Click() Dim a As Integer a = 4

For i = 1 To 3 Print F(a) Next i

End Sub

四、编程题（28分）

1、购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在200元以上者，按9.5折优惠；（2）在300元以上者，

按9折优惠；（3）400元以上者，按8折优惠；（4）600元以上者按7折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2中输出优惠后的

价格。程序运行结果如图所示。(10分

)

………………………………………………………………………………………………………………

答 题 不 得 超 过 装 订 线

2、依次输入某班30个同学外语考试的成绩：

1）计算全班所有同学的外语课平均成绩；（5分）

2）成绩等级评定：90分以上的是优秀，80－90的是良好，70－80的是中等，60－70的是及格，60分以下的是不及格；（5分）

3）统计每个等级的总人数并算出所占比例。（8分）