高二计算机专业期末试卷

高二计算机专业期末试卷I卷（140分）一、选择题（70×2＝140分）1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（）A属性、控件和方法 B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2. 所有控件都有一个共同的属性，这个属性是（）A textB fontC nameD caption3. 下列叙述中错误的是（）A 工程文件扩展名是.vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是.frmD 类模块的扩展名是.cls4. 当要编写一个新的Visual Basic程序时，所做的第一件事是（）A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5. 下面控件中，没有caption属性的是（）A 框架B 组合框C 命令按钮D 复选按钮6. 在文件框中输入字符时，若只显示某个字符，如（*），应设置属性是（）A MultiLineB PasswordCharC TextD selText7. 若要将窗体从内存中卸载出去，其实现的方法是（）A ShowB HideC LoadD UnLoad8. 下列关于过程叙述不正确的是（）A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用，参数传递都是双向的9. 某人创建1个工程，其中的窗体名为Form1，之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是（）A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性”对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为210. 以下关于文件的叙述中，正确的是（）A 以Output方式打开一个不存在的文件时，系统将显示出错信息B 以Append方式打开的文件，既可以进行读操作，也可以进行写操作C 在随机文件在，每个记录的长度是固定的D 无论是顺序文件还是随机文件，其打开的语句和打开的方式都是完全相同的11. 设a=6，b=8，c=10 则函数IIf(a<b,Iif(b<c,c,b),a+b)的返回值是（）A 10B 6C 8D 1212. 下面程序的执行结果为（）I=”1” : j=”2”I=val(i)+val(j)J=val(“12”)If i<>j Then print i-j Else printj-iA 9B -9C 12D 013. 下面程序的执行结果为（）Dim S(10) AS IntegerFor i=0 to 10S(I)=2*iNext iPrint S(S(3))A 12B 6C 0D 414、菜单控件只包括一个事件，即（），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。

A、GotFocusB、LoadC、ClickD、KeyDown15、滚动条控件(如图所示)的Max属性所设置的是（）。

A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性16、以下选项中，不属于标签的属性是（）A 、EnabledB 、CaptionC 、DefaulD 、Font17、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（ ）。

A 、Caption B 、Name C 、Text D 、Label18、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是（ ）。

A 、CaptionB 、NameC 、TextD 、Value19、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？（ ）。

A 、在标题项中输入&，然后打勾B 、在索引项中打勾C 、在有效项中打勾D 、在复选项中打勾20、当执行以下过程时，在窗体上将显示（ ）。

Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End SubA 、 VBHello!VBB 、 VB Hello!VBC 、 VB Hello!D 、 VB Hello! VB21、语句Print "The answer is:";20/4-2的结果为（ ）。

A 、The answer is 20/4-2B 、The answer is 3C 、The answer is "20/4-2"D 、非法语句22、下列哪个控件是容器控件（ ）。

A 、ImageB 、PictureC 、ComboBoxD 、FileListBox23、若要将窗体从内存中卸载出去，其实现的方法是（ ）。

A.Show B.HideC.LoadD.UnLoad24、以下选项中，不是 Visual Basic 控件的是（ ）。

A.窗体B.定时器C.单选框 D.命令按钮25、双击窗体中的对象后，Visual Basic 将显示的窗口是（ ）。

A.代码窗口 B ．工具箱 C ．项目（工程）窗口 D ．属性窗口 26、可决定窗体的左上角是否有控制菜单的属性是（ ）。

A.ControlBoxB.MinButtonC.MaxButtonD.BorderStyle 27、设有如下语句：Strl ＝InputBox （"输入"，""，"练习"）从键盘上输人字符 “示例”后，Strl 的值是（ ）。

A ．“输入” B ．“ ”C ．“练习”D ．“示例”28、窗体Form1的Name 属性是Frm1,它的单击事件过程名是（ ）。

A. Form1_Click B.Form_ClickC. Frm1_ClickD. Me_Click 29、窗体的hide 属性的含义是 （ ）。

A.隐藏B.展现C.装入D.卸载 30、若要设置定时器控件的定时时间，需设置的属性是（ ）。

A ．Enabled B ．Value C ．Interval D ．Text 31、能够改变复选框中背景颜色的属性是（ ）。

A ．ValueB ．FontColorC ．BackColorD ．Font32、窗体能响应的事件是 （ ）。

A ．ActiveFormB ．LoadC ．DriveII 卷（100分）二、填空题（2分×）三、阅读程序，在指定位置写出程序运行结果(4分×5=20分)。

1.以下程序运行后，单击命令按钮，写出程序的运行结果___________。

Private Sub Command1_Click()Dim n%, b, tt = 1: b = 1: n = 2Do While n <= 4If b > 1 Then Exit Dob = b * n: t = t + b: n = n + 1LoopPrint "t=" & tEnd Sub2.在窗体中添加一个命令按钮Command1，并编写如下程序：Private Sub Command1_Click()x = InputBox(x)If x ^ 2 <= 9 Then y = 1 / xIf x ^ 2 > 9 Then y = x ^ 2 + 1If (x ^ 2) - 7 = 9 Then y = xPrint "y=" & yEnd Sub程序运行后，在InputBox中输入4，单击命令按钮，写出程序的运行结果______________。

3.窗体上画一个命令按钮，并编写以下事件过程和子过程：Private Sub Command1_Click()Dim x As Integer, y As Integerx = 12: y = 20Call Value(x, y)Print "x=" & x, "y=" & yEnd SubPrivate Sub Value(ByVal m As Integer, n As Integer)m = m * 2: n = n - 5End Sub程序运行后，单击命令按钮，写出程序的输出结果______________。

4.窗体上画一个命令按钮和一个图像框，并编写以下事件过程：Private Sub Command1_Click()Dim a(3,3)For m =1To3For n= 1 To 3If n = m Or n = 4 –m Thena(m,n)=m+nElsea(m,n)=0End IfPicture1.Print a(m,n)；Next nPicture1.PrintNext mEnd Sub程序运行后，单击命令按钮，图像框中显示的内容是___________________5.在窗体上画一个列表框和一个命令按钮Command1，然后编写如下程序：Private Sub Command1_Click()List1.RemoveItem 1List1.RemoveItem 2End SubPrivate Sub Form_Load()List1.AddItem "兰州"List1.AddItem "甘肃"List1.AddItem "交通"List1.AddItem "大学"End Sub 程序运行后，单击命令按钮，写出在列表框中显示的结果__________________。

四、程序填空题（vb试题，3×2分=6分）（一）窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20分之一像素）。

请填空：Private Sub Form_load( )___________________=loadPicture(“c:\pic\ball.ico”)___________________.Interval=200End SubPrivate Sub Timer1_Timer( )Static x , y As Integerx=x+100y=y+100Picture1.Move _________________End Sub五、（vb题）分析题目：输出（1,100）之间同时被5和7整除的数的个数及其它们的和（10分）。