vb程序设计期末复习题及答案.doc

vb程序设计期末复习题及答案一、填空题1创建一个VB应用程序三个主要的步骤是_、_和_。2当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的_窗口中，把此文本框的_属性设置成空白。3Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用_控件；若允许用户输入文本，则应使用_控件。4窗体的常用方法有_、_、_和_。5要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是_。6若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。Private Sub Cmdopen_ _End Sub7Visual Basic 6种类型的表达式是_、_、_、_、_、_。Visual Basic根据表达式的_来确定表达式的类型。8表达式93 7 Mod 2 2 的值是_。9已知a=3，b=4，c=5，表达式ab and Not ca Or cb And ca And Not b=1.7 And W=62.5 B、T=62.5C、T1.7 And W=1.7 Or W a + b Or b - 1 c - 1 And c + a a Xor b c - 2End Sub7#12/31/1999# - #12/20/1999#的运算结果是#12/11/1999#8可以在窗体的通用部分声明静态变量。9使用声明语句建立一个变量后，Visual Basic会自动对数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串，定长字符串用空格填充，Variant变量被初始化为 Empty，布尔型的变量被初始化为False。10事件过程通常由事件驱动执行，而Sub过程通过过程调用执行。11将焦点主动设置到指定的控件或窗体上应采用SetFocus方法。12当图像控件（Image）的Stretch属性为True时，Image控件能自动调整自己的尺寸与显示的图片匹配。四、读程序题，写出程序运行结果。1Private Sub Form_Click() For I = 1 To 9 For j = 1 To 30 - 3 * I Print ; Next j For k = 1 To I Print k; Next k For k = I - 1 To 1 Step -1 Print k; Next k Print Next IEnd Sub2Option ExplicitPrivate Sub Command1_Click() Static S As Integer Dim i As Integer S = 1 For i = 1 To 5 S = S * i Next i Print SEnd Sub3 For X = 5 To 1 Step -1 For Y = 1 To 6 - X Print Tab(Y + 5); *; Next Y PrintNext X4 Private Sub Form_Activate()Print aa & bb,-5 * 6,Not 2 = 3Print aa & bb; -5 * 6; Not 2 = 3PrintPrint 30+60,Print 30 + 60？30+60; 30 + 60End Sub5X=1Do While X=10If X Mod 7 =0 ThenY = X + 6ElseZ = XEnd IfX = X + 2LoopPrint X,Y,Z五、编程题1设计一个计算程序。该程序用户界面如图所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个按钮：命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command4）组成。程序运行后，用户单击清除按钮，则清除文本框中显示的内容。单击计算按钮，如果成绩填写不完全，则给出提示信息，否则计算三科平均成绩。单击退出按钮则退出。2设计程序。要求：从文本框Text1中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件：除以3余2，除以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，选中其中的文本。3设计一个欢迎程序。该程序用户界面如图所示。要求程序运行后，用户选中粗体复选框时，标签（Label1）中的文字（欢迎您！）的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。若取消选中，则恢复原字体。单击结束，则退出。4任意输入3个数，求大小排第二的那个数，写出程序代码。 VB期末复习参考答案一、填空题1创建应用程序界面 设置属性 编写代码2属性、text3Label TextBox4Load方法 Show方法 Hide方法 Unload方法5txtshow.text=GOOD WORK6Click()、frm1.show7算术表达式 字符串表达式 关系表达式 布尔表达式 日期表达式 对象表达式 运算符819True False101211Sin(x) 2 + Sqr(x 2 - y 2) / (2 * x)12Dim A(1 To 5，-2 To 6) As String13单击 双击 装载 多 响应某个事件后所执行的程序代码 cmd1 Click14完成某种特定的功能 对象名.方法名 Form1.Show15AutoSize Stretch16FileCopy c:，d:二、单项选择题1B 2C 3C 4D 5D 6B 7B8D 9D 10C 11D 12A 13C三、指出下列句中的错误，修改或者说明原因。1int.sum 不正确。变量名中不能包括小数点。2变量名的长度最长可达255个字符。3 3.6 ， 4因为a 不是整型变量。4不正确。程序不可以改变字符的长度，这是VB规定。5不完全正确。Variant是一种特殊的数据类型，除了定长字符串数据及用户定义类型外，可以包含任何种类型的数据，这是VB规定。6False 。逻辑表达式计算结果。7不正确。两个日期型数据相减，其结果是一个数值型数据。8不正确。静态变量为局部变量，只能在过程中声明。9正确。10正确。11正确。12不正确。该属性设为Ture时，Image控件不能自动调整自己的尺寸与显示的图片匹配，而可以使图片自动扩展以适应控件的尺寸。四、读程序题，写出程序运行结果。1程序运行后，单击窗体，输出结果为：11 2 11 2 3 2 11 2 3 4 3 2 11 2 3 4 5 4 3 2 11 2 3 4 5 6 5 4 3 2 11 2 3 4 5 6 7 6 5 4 3 2 11 2 3 4 5 6 7 8 7 6 5 4 3 2 11 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 12程序运行后，单击按钮Command1，输出结果为：120。3. * * * * *4.aabb -30 Falseaabb-30 False30+60 9030+60 905. 11 13 9五、编程题1Private Sub Command1_Click() Text1.Text = Text2.Text = Text3.Text = Text4.Text = End SubPrivate Sub Command2_Click() a = Trim(Text1.Text) b = Trim(Text2.Text) c = Trim(Text3.Text) If a = Or b = Or c = Then MsgBox 成绩填写不完全！, vbCritical Else Text4.Text = (Val(a) + Val(b) + Val(c) / 3 End IfEnd SubPrivate Sub Command3_Click() Unload MeEnd Sub2Private Sub Command1_Click() x = Val(Text1.Text) If x Mod 3 = 2 And x Mod 5 = 3 And x Mod 7 = 4 Then Print x Else Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End IfEnd Sub3Private Sub Check1_Click() If Check1.Value = 1 Then Label1.Font.Bold = True Else Label1.Font.Bold = False End IfEnd SubPrivate Sub Check2_Click() If Check2.Value = 1 Then Label1.Font.Italic = True Else Label1.Font.Italic = False End IfEnd SubPrivate Sub Command1_Click() Unload MeEnd Sub4a = Val(InputBox(输入第一个数：)b = Val(InputBox(输入第二个数：)c = Val(InputBox(输入第三个数：)If a b Then t = a: a = b: b = tIf a c Then t = a: a = c: c = tIf b c Then t = b: b = c: c = tMsgBox (求大小排第二的数是： & b)VB期末考试试题 A卷一、 填空题1、VB程序设计的主要特点是 （1） 和 （2） 。2、在VB中，最主要的两种对象是 （3） 和 （4） 。3、工程是构成应用程序文件的 （5） 。4、方法是VB提供的一种 （6） ，用来完成一定的操作。5、浮点类型数据包括单精度型和_（7）_数据。6、事件是窗体或控件对象识别的_（8）_。7、可用窗体的_（9）_ 方法在窗体中显示文字。8、 复选框控件Value属性指示复选框处于_（10）_或禁止状态(暗淡的)中的某一种。9、在VB中，修改窗体的 （11）和 （12） 属性值，可改变窗体的大小。10、双击工具箱中的控件图标，可在窗体的 （13） 出现一个尺寸为缺省值的控件。11、在MsgBox函数中，如果缺省title参数，则使用 （14） 作为消息框的标题。12、设x34.58，语句Print Format(x,“000.0”)的输出结果是 （15） 。13、在VB 中，数值型变量的初值为 （16） ，Varant型变量的初值为 （17） ，布尔型变量的初值为 （18） 。14、设置窗体的 （19） 属性，可在窗体上显示图片。15、程序运行工程中，清除MP图片框中的图片应使用语句 （20） 。二、选择题1、菜单控件只包括一个事件，即 （1） ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。A、GotFocus B、Load C、Click D、KeyDown2、滚动条控件(如图所示)的Max属性所设置的是 （2） 。A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、 单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句 Select * Form student 中的 *表示 （3） 。A、所有记录 B、所有字段 C、所有表 D、都不对4、以下选项中，不属于标签的属性是 （4） 。A、Enabled B、Caption C、Default D、Font5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 （5） 。 A、Caption B、Name C、Text D、Label6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 （6） 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ （7） 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 （8） 。Private Sub Command1_Click( )Print VB;Print Hello! ;Print VBEnd SubA、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB9、语句Print The answer is:;20/4-2的结果为 （9） 。A、The answer is 20/4-2 B、The answer is 3C、The answer is 20/4-2 D、非法语句 10、下列哪个控件是容器控件 （10） 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 （11） 。A.Show B.Hide C.Load D.UnLoad12、以下选项中，不是 Visual Basic控件的是 （12） 。 A.窗体 B.定时器 C.单选框 D.命令按钮13、双击窗体中的对象后，Visual Basic将显示的窗口是 （13） 。 A.代码窗口 B工具箱 C项目（工程）窗口 D属性窗口14、可决定窗体的左上角是否有控制菜单的属性是 （14） 。A.ControlBox B.MinButton C.MaxButton D.BorderStyle15、设有如下语句： StrlInputBox（输人，练习）从键盘上输人字符 “示例”后，Strl的值是 （15） 。 A“输入” B“ ” C“练习” D“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 （16） 。 A. Form1_Click B.Form_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 （17） 。 A.隐藏 B.展现 C.装入 D.卸载18、若要设置定时器控件的定时时间，需设置的属性是 （18） 。AEnabled BValue CInterval DText19、能够改变复选框中背景颜色的属性是 （19） 。 AValue BFontColor CBackColor DFont20、窗体能响应的事件是 （20） 。 AActiveForm BLoad CDrive DChange三、判断题(判断下列正确与否，正确的打，错误的打。)1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。2、图象框中的Stretch属性为true时，其作用是图形自动调整大小以适应图象控件。3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。4、通过改变属性窗口中的Name属性，来改变窗体的标题。5、创建VB应用程序的三个主要步骤是：(1)创建应用程序界面(2)设置控件(3)编写代码。6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。7、已知PMsgBox(“Howareyou?，VbYesNo+VbQuestion，“Hello!”)，变量P是Integer数据类型。8、工程文件的扩展名是 .vbg 。9、VB允许设计和使用用户自己设计的控件。10、OptionButton控件没有DblCliek事件。11、同一条记录中的各数据具有相同的类型。12、使用Data控件可以直接显示数据库中的数据。13、ImageList 是一个图像容器控件，可用作工具栏的图像库。14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。15、在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex值为10。17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。18、使用数组定义语句：Dim D$（10），则数组D中各元素的值为空。19、如果在一行中输入多条语句，各语句之间用使用 ；分隔。20、在代码窗口中输入某行代码并按回车键之后，如果代码变成红色，说明该行代码有语法错误。 四、读程序题，写出程序运行结果 1、 Private Sub Form_Click()Static SUM As IntegerI = 1Do While I=10SUM = SUM + II = I + 1LoopPrint SUMEnd Sub 运行程序，第一次单击窗体： 第二次单击窗体： 2、 Private Sub Form_Click()Print *; Tab(6); 2, Tab(15); 5PrintFor I = 15 To 16Print I;For j = 2 To 6 Step 3 Print Tab(3 * j); j * I;Next jPrintNext IEnd Sub 程序运行结果： 五、编程题（一）窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20分之一像素）。请填空： Private Sub Form_load( ) （1） =loadPicture(“c:picball.ico”) （2） .Interval=200 End Sub Private Sub Timer1_Timer( ) Static x , y As Integer x=x+100 y=y+100 Picture1.Move （3） End Sub （二）有一个单击按钮过程，其作用是产生50个60100的随机数，统计其中被6整除余2的个数，并将这些数输出。请填空： Private Sub Command1_Click() Dim x As Integer, N% Dim Counter As Integer (1) Timer For N=1 To 50 X=Rnd()* (2) If (3) =2 Then Print x Counter= (4) (5) Next N Print Counter End SubVB程序设计与应用参考答案一、填空题12345答案可视化设计事件驱动编程窗体（form）控件集合题号678910答案特殊子程序双精度动作Print选中题号1112131415答案高度（Height）宽度(Width)中央工程134.6题号1617181920答案0空FalsePictureCls二、选择题12345答案CABCA题号678910答案DDABB题号1112131415答案DAAAD题号1617181920答案CACCB三、判断题12345678910答案11121314151617181920答案四、程序阅读题：（一） （10分） 1 、 55 2、 110 （二）、 （10分） * 2 515 30 75 16 32 80五、编程题 （20分）（一）1、Picture1.Picture 2、 Timer1 3、 x ,y (二) 1、 Randomize 2、 Rnd()*41+60 3、 x Mod 6 4、 Counter1 5 End If 一、单项选择题（共10分）1在代码中引用一个控件时，应使用控件的（B）属性。 ACaption BName CText DIndex2设变量x = 4，y = -1，a = 7，b = -8,下面表达式（A）的值为“假”。 Ax+a 0 AND y y D x+y a+b AND NOT (y b = c AND a = d的值为False 。三、将下列数学表达式转换为VB表达式。（6分）1a2+2ab+b2 ： a2+2*a*b+b228exln10 ：8*exp(x)*log(10) 32sin(450)cos(450) ：2*sin(3.1416/4)*cos(3.1416/4)6在VB中，用户定义常量使用 Const 语句，声明变量使用 Dim语句。1在VB 6.0中，扩展名为.vbp的文件称为 A 。A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件2在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是 A 。A) 代码窗口B) 窗体设计窗口C) 属性窗口D) 工程资源管理器窗口3设有变量定义语句Dim a%，则变量a的数据类型是 A 。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4下列表达式中，值为False的是 D 。A) ABabcB) ABC = UCase(abc)C) ABCDabcD) Mid(ABCD,3,1)=Left(ABCD,3)5函数InStr(ABCDEF, CD)的值是 B 。A) 2B) 3C) True D) CDEF 6下列程序运行后，单击窗体，输出结果是 C 。Private Sub Form_Click()Dim a As Integer, b As Integera = 3b = 5Print a + b; a & bEnd SubA) 8 8B) 35 35C) 8 35D) 35 87下列程序运行后，单击窗体，输出结果是 B 。Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a b : a = a - b Print a; bEnd SubA) 4 3B) 7 3C) 3 7D) 10 7 8下面程序段所表示的数学关系式是 C 。If (a b) Then If d = c Then x = 1 Else x = 2 End IfA) B) C) D) 9下列程序运行后，单击窗体，输出结果是 C 。Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k = 5 Print sEnd SubA) 15B) 10C) 1D) 010下列程序段的输出结果是 B 。For k = 4 To 2 Step -2 m = k Next k Print m; k;A) 2 2B) 2 0C) 2 1D) 0 0 11用下面的语句定义数组，则数组中的元素个数是 D 个。Option Base 1 Dim A(-1 To 2，5) As IntegerA) 5B) 10C) 15D) 2012下面程序段的输出结果是 C 。Dim a(4) As Integer, s As IntegerFor k = 1 To 4 a(k) = 2 * kNext k For k = 1 To 4 Step 2 s = s + a(k) Print s; Next kA) 8B) 20C) 2 8D) 2 6 12 2013设有如下的用户自定义类型Private Type Stu name As String * 10 age As IntegerEnd Type则以下正确引用该类型成员的代码是 B 。A) S=zhangB) Dim s As Stu = zhangC) Dim s As Type Stu = zhangD) Dim s As Type = zhang14用“ B ”关键字声明的变量称为全局变量。A) PrivateB) PublicC) DimD) Static15在窗体上放置一个文本框，程序运行后，在文本框中输入abc，但显示的却是*，可能的原因是该文本框的 D 属性值已经被设置为*。A) FontB) TextC) NameD) PasswordChar16在VB 6.0中，Print是对象的 B 。A) 属性B) 方法C) 事件D) 名称17在VB 6.0中，要判断复选框是否为选中状态，使用的属性是 D 。 A) CaptionB) CheckedC) SelectedD) Value18设列表框List1中共有3个列表项，如右图所示。则下列语句中，能够删除最后一个列表项的是 A 。A) List1.RemoveItem 2B) List1.RemoveItem 项目CC) List1.RemoveItem List1. ListcountD) List1.RemoveItem List1. ListIndex19组合框分为下拉式组合框、简单组合框和下拉式列表框，在“属性”窗口中这三种类型是由 A 属性设置的。A) StyleB) FillStyleC) BackStyleD) BorderStyle20用户单击滚动条的空白处（滑块与两端滚动箭头之间的区域）时，Value属性所增加或减少的值，是由 D 属性决定的。A) MinB) MaxC) SmallChangeD) LargeChange21将图片文件“b.jpg”作为背景图片，装入当前窗体，正确的语句是 D 。A) Me.Picture=b.jpgB) Me.Picture= LoadPicture(b.jpg)C) Me.Picture=b.jpgD) Me.Picture= LoadPicture(b.jpg)22要将两个单选按钮放置在同一个框架内，使它们成为一组，正确的操作是 A 。A) 先放置一个框架，然后在框架中放置两个单选按钮B) 先放置两个单选按钮，再放置一个框架，放置框架时覆盖在单选按钮上C) 先放置两个单选按钮，再放置一个框架，然后将两个单选按钮拖动到框架内D) 以上三种方法都正确23计时器控件能够响应的事件是 D 。A) LoadB) ClickC) ChangeD) Timer24要使命令按钮处于无效