2017-2018学年第二学期期末考试VB试题
vb期末试题及答案
vb期末试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个不是基本数据类型？A. IntegerB. StringC. ObjectD. Array答案：D2. 以下哪个选项是正确的VB变量声明方式？A. Dim varNameB. varName As IntegerC. Integer varNameD. Both A and B答案：D3. VB中的For循环结构不包括以下哪个部分？A. 初始化表达式B. 循环条件C. 迭代表达式D. 循环体答案：D4. 在VB中，以下哪个是正确的数组声明方式？A. Dim arr(0 To 10) As IntegerB. Dim arr As Integer(0 To 10)C. Dim arr(10)D. Both A and C答案：A5. VB中，以下哪个是正确的函数定义？A. Function myFunction() As IntegerB. Sub myFunction() As IntegerC. Function myFunction() IntegerD. Both A and C答案：A6. 以下哪个是VB中的事件处理程序的正确声明方式？A. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickB. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)C. Private Sub Button1_Click()D. Both A and C答案：A7. 在VB中，以下哪个不是控件的属性？A. TextB. FontC. ClickD. Size答案：C8. VB中，以下哪个是正确的类定义？A. Class MyClassB. Type MyClassC. Structure MyClassD. Both A and B答案：A9. VB中，以下哪个是正确的方法调用？A. myMethod(10)B. myMethod = 10C. myMethod += 10D. Both A and C答案：A10. 在VB中，以下哪个是正确的条件语句？A. If x > 0 ThenB. If x > 0C. If (x > 0)D. All of the above答案：D二、填空题（每空2分，共20分）1. 在VB中，使用 ______ 语句可以定义一个类。
VB期末考试考卷及答案
VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。
（）2. 在VB中，Sub过程可以返回值。
（）3. VB中的数组下标从1开始。
（）4. 在VB中，可以使用Select Case语句进行多条件判断。
（）5. VB中的字符串可以用单引号(')表示。
（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。
2. VB中的逻辑运算符包括______、______和______。
3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。
4. 在VB中，______方法用于设置文本框的字体。
5. VB中的______事件在用户单击按钮时发生。
四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。
2. 请列举三种VB中的数据类型。
3. 简述如何使用Select Case语句进行多条件判断。
4. 请说明如何使用VB中的循环结构实现1到100的累加。
5. 简述如何使用VB中的文件操作函数读取文件内容。
五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。
2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。
3. 编写一个VB程序，使用循环结构输出九九乘法表。
vb期末考试试题及详细答案
vb期末考试试题及详细答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个不是合法的变量名？A. MyVariable123B. 123MyVariableC. VariableNameD. Variable_Name2. 下列哪个语句可以正确地将字符串"Hello"赋值给变量str？A. str = "Hello"B. Dim str As String = "Hello"C. str = 'HelloD. str = "Hello"3. 在Visual Basic中，以下哪个是正确的条件语句？A. If x > 10 ThenB. If x > 10C. If x > 10 ElseD. If x > 10 End If4. 下列哪个是Visual Basic中的数组声明？A. Dim myArray(1 To 10) As IntegerB. Dim myArray(10) As IntegerC. Dim myArray As Integer(1 To 10)D. Dim myArray As Integer = New Integer(10)5. 在Visual Basic中，以下哪个是正确的循环结构？A. For i = 1 To 10B. For i = 10 To 1 Step -1C. For i = 10 To 1D. All of the above6. 在Visual Basic中，以下哪个是正确的函数调用？A. Call PrintName("John")B. PrintName("John")C. Function PrintName("John")D. PrintName Call "John"7. 在Visual Basic中，以下哪个是正确的事件处理程序的声明？A. Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)B. Sub Button1_Click()C. Function Button1_Click()D. Sub Button1_Click(sender, e)8. 在Visual Basic中，以下哪个是正确的类定义？A. Class MyClassPrivate x As IntegerEnd ClassB. Class MyClassDim x As IntegerEnd ClassC. Class MyClassPublic x As IntegerEnd ClassD. All of the above9. 在Visual Basic中，以下哪个是正确的继承声明？A. Inherits MyBaseClassB. Inherits MyBaseClass()C. Inherits MyBaseClass MyBase()D. Inherits MyBaseClass MyBase10. 在Visual Basic中，以下哪个是正确的异常处理结构？A. TryCatch ex As ExceptionEnd TryB. TryCatch ex As ExceptionFinallyEnd TryC. TryCatch ex As ExceptionD. All of the above二、简答题（每题5分，共10分）1. 解释Visual Basic中的事件和委托的区别。
VB期末试题（含答案）
VB期末试题（含答案）一、单选题（每题1.5分，共30分）1.在VB中，假定有以下程序段, 则执行结束后k的值是：（ A ）For i =1 To 3k = i+2Next iA． 5 B．4 C． 3 D．62. 以下控件中可以作为容器控件的是（ B ）A．Image图像框控件 B．PictureBox图片框控件C．TextBox文本框控件 D．ListBox列表框控件3.关于Image控件和PictureBox控件的说明，其中错误的是（ B ）A．Image控件和PictureBox控件都有Picture属性B．Image控件和PictureBox控件都支持Print方法C．Image控件和PietureBox控件都可以用LoadPicture函数把图形文件装入控件中D．Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件4.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件)，则应将其Interval属性值设置为( D )A．5 B．500 C．10 D．5000 5.能显示窗体的方法是（ B ）。
A．Visible B．Show C．New D．Open6.MsgBox函数中有4个参数，其中必须写明的参数是（ C ）A．指定显示按钮的个数 B．对话框的标题 C. 提示信息 D. 所有参数都是可选的7.你若在代码窗口中编写：msgbox(“AAAA”,vbokonly,”BBBB”)语句后，所产生的信息框的标题是（ C ）A．AAAA B．空 C．BBBB D．出错，不能产生信息8.要使文本框获得输入焦点，则应采用文本框控件的（D ）方法。
A．GotFocus B．LostFocus C．KeyPress D．SetFocus9.为了把焦点移到某个指定的控件，所使用的方法是（ A ）A．SetFoeus B．Visible C．Refresh D．GetFocus10.语句if 3*4>=10 thena=1elsea=2end if执行后，a的值为（ D ）。
vb期末测试题及答案
vb期末测试题及答案一、单选题（每题2分，共20分）1. VB中，以下哪个是合法的变量名？A. 2variableB. Variable2C. Variable-2D. Variable 2答案：B2. 在VB中，以下哪个是正确的字符串连接运算符？A. +B. &&C. &D. ||答案：C3. VB中，以下哪个函数用于计算字符串的长度？A. LenB. LengthC. SizeD. Count答案：A4. 在VB中，以下哪个循环结构用于重复执行代码块，直到满足某个条件？A. For...NextB. Do...LoopC. While...WendD. If...Then答案：B5. VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. StaticD. Public答案：B6. 在VB中，以下哪个是正确的数据类型用于存储日期？A. DateB. DateTimeC. StringD. Integer答案：B7. VB中，以下哪个是正确的子程序声明？A. Sub MySub()B. Function MySub()C. Procedure MySub()D. Method MySub()答案：A8. 在VB中，以下哪个是正确的数组声明？A. Dim arr(10)B. Dim arr() As IntegerC. Dim arr(10) As IntegerD. Dim arr As Integer(10)答案：C9. VB中，以下哪个是正确的条件语句？A. If...Then...ElseB. When...Then...ElseC. If...Then...End IfD. If...Then...Else...End答案：C10. 在VB中，以下哪个是正确的事件处理程序声明？A. Private Sub Form_Load()B. Public Sub Form_Load()C. Private Function Form_Load()D. Public Function Form_Load()答案：A二、填空题（每题2分，共20分）1. VB中，用于声明变量的关键字是________。
VB期末考试试卷及答案
VB期末考试试卷及答案一·选择题1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（B ）A属性、控件和方法B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2. 所有控件都有一个共同的属性，这个属性是（C ）A textB fontC nameD caption3。
下列叙述中错误的是（A )A 工程文件扩展名是.vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是。
frmD 类模块的扩展名是.cls4。
当要编写一个新的Visual Basic程序时，所做的第一件事是（A )A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5。
下面控件中，没有caption属性的是（B ）A 框架B 组合框C 命令按钮D 复选按钮6. 在文件框中输入字符时，若只显示某个字符，如(＊），应设置属性是（B ）A MultiLineB PasswordCharC TextD selText7. 若要将窗体从内存中卸载出去，其实现的方法是（D ）A ShowB HideC LoadD UnLoad8。
下列关于过程叙述不正确的是（D ）A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用，参数传递都是双向的9。
某人创建1个工程，其中的窗体名为Form1,之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是( C )A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性"对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为210。
vb期末考试试题和答案
vb期末考试试题和答案**VB期末考试试题和答案**一、单选题（每题2分，共20分）1. 在Visual Basic中，以下哪个不是基本数据类型？A. IntegerB. DoubleC. StringD. Object答案：D2. 下列哪个选项是Visual Basic的事件驱动编程模型？A. 用户操作B. 程序流程C. 函数调用D. 循环执行答案：A3. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A4. 如果要声明一个变量用于存储字符串，应该使用以下哪个数据类型？A. IntegerB. StringC. DoubleD. Boolean答案：B5. 在Visual Basic中，哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B6. Visual Basic中，以下哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B7. 在Visual Basic中，以下哪个语句用于结束程序的执行？A. EndB. ExitC. StopD. Return答案：A8. Visual Basic中，以下哪个控件用于创建下拉选择列表？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B9. 在Visual Basic中，以下哪个关键字用于声明一个过程？A. SubB. FunctionC. PropertyD. Event答案：A10. Visual Basic中，以下哪个函数用于获取当前系统日期？A. NowB. DateC. TimeD. Timer答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个数组。
vb考试期末试题及答案
vb考试期末试题及答案[正文]第一部分：选择题1. VB的全称是什么？A. Visual BasisB. Visual BasicC. Viewer BasicD. Virtual Basic答案：B2. VB是哪个公司开发的？A. MicrosoftB. AppleC. GoogleD. IBM答案：A3. VB是一种什么类型的语言？A. 编译型语言B. 解释型语言C. 面向对象语言D. 脚本语言答案：A4. 下面哪个不是VB的数据类型？A. IntegerB. StringC. BooleanD. Float答案：D5. VB中，用于显示消息框的函数是什么？A. MsgBoxB. AlertC. PrintD. Display答案：A6. VB中，用于定义变量的关键字是什么？A. VarB. DimD. Define答案：B7. VB中，用于循环执行一段代码的结构是什么？A. For LoopB. While LoopC. Do While LoopD. If-Else答案：C8. VB中的事件是指什么？A. 用户的操作或系统的消息B. 变量的赋值C. 函数的调用D. 数据的排序答案：A9. VB中，用于创建函数的关键字是什么？A. FunctionB. SubD. Define答案：A10. VB中，用于调试代码的工具是什么？A. DebuggerB. CompilerC. InterpreterD. Editor答案：A第二部分：编程题（请在空白处编写代码）1. 编写一个VB程序，实现输入两个数字并将它们相加的功能。
Dim num1 As IntegerDim num2 As IntegerDim sum As Integernum1 = InputBox("请输入第一个数字:")num2 = InputBox("请输入第二个数字:")sum = num1 + num2MsgBox "两个数字的和是:" & sum2. 编写一个VB程序，实现计算一个数组中所有元素之和的功能。
VB期末考试题库及答案最新最全面(完整版)
试卷方案： 201105 Visual Basic 期末考试方案一、单项选择 _ 共 50 题 （选： 20 题 *1 ’=20 分） 第 1 题以下有关对象属性的说法中，错误的是.A. 工具箱中的控件并不是 VB 中所有的控件B.若将 Frame 的 Enabled 属性设置为 C. 对象的 Name 属性在运行时不能改变False ，则不能使用放置在 Frame 里面的控件 D. 对象的所有属性都可以在属性窗口中设置 第 2 题3x | x e 数学表达式 的 VB 算术表达式为 .sin 27y |A. Sin(27)+Sqr(x+Exp3)/(x+y)B. Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y)C. Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y)D. Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y) 第 3 题下列有关对象的叙述中 , 正确的是A. 对象由属性，事件和方法构成B. 对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置C. 对象的事件一定就是由 VB 预先设置好的人工干预的动作D. 对象的方法是对象响应某个事件后执行的一段程序代码 第 4 题表达式 A. 1 第 5 题的运算结果是 CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0 Mod 2.C. – 2D. – 3B. -1下列关于菜单的说法中 , 错误的是 .A. 每一个菜单项就是一个对象，并且可设置自己的属性和事件B. 菜单项不可以响应 DblClick事件C. VB6.0 允许创建超过四级的子菜单D. 程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的 第 6 题属性为 Enabled False以下关于数组的说法中 A. 使用了 Preserve , 错误的是 .子句的 Redim 语句，只允许改变数组最后一维的上界 B. 对于动态数组 , Redim 语句可以改变其维界但不可以改变其数据类型 C. Erase 语句的功能只是对固定大小的数组进行初始化 D. Lbound 函数返回值是指定数组某一维的下界 第 7 题设 运行 print a>b>c 的结果是 .a=3,b=2,c=1, D. 出错A. TrueB. FalseC. 1第 8 题以下说法不正确的是.A. 使用不带关键字B. 使用不带关键字C. 使用不带关键字D. 使用不带关键字第9 题的的的的ReDim语句可以重新定义数组的维数ReDim语句可以改变数组各维的上、下界ReDim语句可以改变数组的数据类型ReDim语句可以对数组中的所有元素进行初始化PreservePreservePreservePreserve在列表框List1 中有若干列表项A. List1.text=""B. List1.List(List1.ListIndex)=""C. List1.Clear, 可以删除选定列表项的语句是.D. List1.RemoveItem List1.ListIndex第10 题2 x 5 3e ln x sin ( 2 x )数学表达式对应的VB表达式是.x 2| sin x cos |A. (e^(2* π*x-5)*Log(x)+(Sin(2x))^3)/Sqr(Sin(x)-Cos(x^2))B. (Exp(2*3.14159*x-5)*Log(x)+(Sin(2*x))^3)/Sqr(Sin(x)-Cos(x^2))C. (Exp(2* π*x-5)*Ln(x)+(Sin(2*x))^3)/Sqr(Sin(x)-Cos(x^2))D. e^(2*3.14159*x-5)*Ln(x)+(Sin(2*x))^3)/Sqr(Sin(x)-Cos(x^2))第11 题以下有关数组参数的说明中，正确的是A. 在过程中也可用Dim 语句对形参数组进行说明B. 动态数组作为实参时，可用ReDim语句在过程中改变对应形参数组的维界C. 调用过程时，数组名不能作为实参D. 数组可以按地址传递也可以按植传递第12 题下列有关过程的说法中, 错误的是.A. 在Sub 或B. 对于使用过程内部不能再定义其它Sub 或Function 过程FunctionByRef 说明的形参, 在过程调用时形参和实参只能按传址方式结合C. 递归过程既可以是递归过程, 也可以是递归Sub 过程FunctionD. 可以像调用第13 题Sub 过程一样使用Call 语句调用Function 过程要将焦点设置在某个控件上, 以下四个选项中正确的是.A. 只能使用鼠标直接点击控件B. 只能使用Tab 键将焦点移到该控件C. 只能在程序中调用该控件的SetFocus 方法D. A 、B、C 三选项中涉及的方法均可使用第14 题以下Case 语句中, 能正确描述A. Case Abs(Y)>6C. Case Not(-6 To 6)第15 题以下关于变量作用域的叙述中Y 的绝对值大于 6 的是.B. Case -6 To 6D. Case Is<-6,Is>6 , 正确的是.A. 窗体中凡用Private 声明的变量只能在某个指定的过程中使用B. 模块级变量只能用Dim 语句声明C. 凡是在窗体模块或标准模块的通用声明段用Public 语句声明的变量都是全局变量D. 当不同作用域的同名变量发生冲突时，优先访问局限性小的变量第16 题以下关于数值常量的说法中, 错误的是A. 八进制数的表示方法是在数字前面加B. 十六进制数的表示方法是在数字前面加&O&HC. 在浮点运算中使用D来分隔尾数和指数时，系统将把该数值作为单精度型数处理D. 32768 是合法的数值常量第17 题x 3e sin 30数学表达式对应的VB表达式是.x A. Abs(e^x+Sin(30)^3) y∕Sqr(x+y))B. Abs(Exp(x)+Sin(30)^3) ∕(Sqr(x+y))C. Abs(e^x+Sin(30*3.14159 ∕180)^3) ∕(Sqr(x+y))D.Abs(Exp(x)+Sin(30*3.14159 ∕180)^3) ∕Sqr(x+y))第18 题下面的 4 个表达式中, 有关个能够对类型变量x( 正数) 的第3 位小数正确地进行四舍五入计Single算.Format(x, ″#.00 ″)Fix(100*(x+0.005))/100Int(100*(x+0.005))/100 CInt(100*(x+0.005)/100A. 1 个第19 题B. 2 个C. 3 个个D. 4执行以下语句时, 会出现错误提示的是.A. Print"2b3 " +12.5D.Print"2e3"+12第20 题以下Case 语句含有错误的是A. Case 0 To 10第21 题B. Print"12.5"+ 12C.Print"12.5" & 12.5.B. Case Is>10C. Case Is>10 And Is<50D. Case 3,5,Is>10下列语句中, 正确的是A. Textl.SetFocus第22 题B. Forml.ClearC. Labell.SetFocusD. Listl.Cls下列选项中, 所包含的所有表达式能够将两位整数.x 的个位数与十位数对调( 如将78 转换为87) 的是①Val(Right(X,1)&Left(X,1))③Val(Right(CStr(X),1)&Left(CStr(X),1))②Val(Right(Str(X),1)&Left(Str(X),1))④Val(Mid(X,2,1)+Mid(X,1,1))D. ①③④A. ①②第23 题B. ②③②④C.以下关于子过程或函数的定义中A. Sub f1(n As String*1 )C. Function f1(f1 As Integer)As, 正确的是B. SubD. Functionf1(n Asf1(ByValInteger)As Integern As Integer) Integer第24 题下列有关控件数组的说法中, 错误的是.A. 控件数组由一组具有相同名称和相同类型的控件组成，不同类型的控件无法组成控件数组B. 控件数组中的所有控件不得具有各自不同的属性设置值C. 控件数组中的所有控件共享同一个事件过程D. 控件数组中每个元素的下标由控件的第25 题Index 属性指定以下对数组参数的说明中, 错误的是.A. 在过程中可以用Dim 语句对形参数组进行声明B. 形参数组只能按地址传递C. 实参为动态数组时，可用ReDim语句改变对应形参数组的维界D. 只需把要传递的数组名作为实参，即可调用过程第26 题要向文件datal.txt 添加数据, 正确的文件打开命令是.A. Open"datal.txt"For Output As #1B. Open"datal.txt"For Input As #1C. Open"datal.txt"For Append As #5D. Open"datal.txt" For Write As #5第27 题下面有关数组处理的叙述中，正确的是.A. 在过程中使用ReDim语句可以改变动态数组数据的类型B. 在过程中，可以使用Dim 、Private 和Static 语句来定义数组C. 用ReDim语句重新定义动态数组时，可以改变数组的大小，但不能改变数组的维数D. 不可以用Public 语句在窗体模块的通用处说明一个全局数组第28 题下面的表达式中, 运算结果为True 的是.A. "abcrd" <="ABCRD"C. 3>2>1第29 题B. Int(134.69) <=CInt(134.69)D. Mid("Visual",1,4)=Right("lausiV",4)设计界面时设置为 3.A. MultiLine 第30 题, 要使一个文本框具有水平和垂直滚动条, 应先将其属性置为再将ScrollBar 属性True,B. AutoSizeC. AlignmentD. RightToLeft下面有关数组的说法中, 正确的是A. 数组的维下界不可以是负数B. 模块通用声明处有C. 模块通用声明处有D. 模块通用声明处有第31 题下面有关数组的叙述中，则模块中数组定义语句Dim A(0 To 5) 会与之冲突Option Base 1Option Base 1Option Base 1，模块中有，模块中有Dim A(0 To 5), 则A 数组第一维维下界为DimA(0 To 5), 则A 数组第一维维下界为1 , 不正确的是.①②③在过程中用ReDim语句定义的动态数组, 其下标的上下界可以是变量数组作为形式参数时, 传递的是每个数组元素的值在窗体模块的通用声明处可以用Public 说明一个全局数组④数组定义语句中可以用负数或小数来指定某一维的维下界或维上界的值A. ②③第32 题下列关于对象A. SetFocus C. Setfocus 第33 题创建一个名为.B. ①③④C. ①②③④D. ③④与GotFocus 的描述中, 正确的是SetFocus是事件,GotFocus 是方法 B. Setfocus 和Gotfocus 都是事件和GotFocus 都是方法 D. SetFocus 是方法,GotFocus 是事件" 文件" 的菜单项, 欲使其可用方式访问, 则在菜单编辑器的标题文本框中应输入Alt+FA. 文件($F) 第34 题在下列属性中B. 文件(&F)C. 文件(#F)D. 文件(%F), 属于CommandButton控件、ListBoxB. Visible 、Font控件共有的是.A. Caption 、Text 第35 题、Visible 、Visible C. Caption D. List下列能够正确表示条件"X≤Y<Z"的VB逻辑表达式是A. X ≤Y<Z第36 题以下关于C. X ≤Y OR Y<ZB. X<=Y And Y<Z D. X<=Y<Z过程的说法中, 错误的是.过程名可以有一个或多个返回值A. FunctionB. 在Function 过程内部不得再定义C. Function 过程中可以包含多个Function 过程语句Exit FunctionD. 可以像调用第37 题Sub 过程一样调用Function 过程下面的关系表达式中A. CInt(1.5)=Int(1.5) C. Fix(-1.5)=CInt(-1.5) 第38 题, 运算结果为True 的是.B. Fix(1.5)=Int(1.5)D. Fix(-1.5)=Int(-1.5)已知X<Y,A>B,则下列表达式中A. Sgn(X-Y)+Sgn(A-B)=-1C. Sgn(Y-X)+Sgn(A-B)=2 , 结果为True 的是B. Sgn(X-Y)+Sgn(A-B)=-2D. Sgn(Y-X)+Sgn(A-B)=0第39 题执行语句时, 会出现出错提示信息.A. Print 5+7=14 C. Print 32768*2 第40 题B. Print 16384*2D. Print "14"+32sin 302log x y数学表达式对应的Visual Basic 表达式是.x yeA. Sin(30*3.14159/180)+Sqr(Log(x)+y)/2*3.14159+Exp(x+y)B. (Sin(30* π/180)+Sqr(Ln(x)+y))/(2* π+Exp(x+y))C. Sin(30*180/3.14159)+Sqr(Log(x)+y)/(2*3.14159+e^(x+y))D. (Sin(30*3.14159/180)+Sqr(Log(x)+y))/(2*3.14159+Exp(x+y))第 41 题在一个多窗体程序中 A. Form2.Unload C. Form2.End 第 42 题 , 可以仅将窗体 Form2 从内存中卸载的语句是 B. Unload Form2D. Form2.Hide.Print 方法可在 上输出数据 . ①窗体 A. ①③⑥ 第 43 题②文本框B. ③图片框②③⑤④标签⑤列表框⑥立即窗口①②⑤D. ③④⑥C. 若要使逻辑表达式 结果为 True, 则 x 、y 、 z 的取值应为下列选项中的 x>y Xor y<z .x=3 、y=3 、z=4 x=1 、 y=3 、z=2 44 题 、y=1 、 z=2 、y=2 、 z=2 A. C. B. x=2 D. x=2 第 下列 是合法的变量名 . B. – alA. abs 第 45 题 C. cdc dD. Abe_10下列 是正确的 VB 常量 . A. D-6 第 46 题 若在模块中用B. E-6C. 5DD. 5E-6定义了函数 Fun. 调用函数 Private Function Fun(A as Single,B as Integer) As Integer Fun 的过程中定义了.I 、J 和 K 三个 Integer 型变量 , 则下列语句中不能正确调用函数 Fun 的语句是A. Fun 3.14,J 第 47 题B. Call Fun(I,365)C. Fun(I),(J)D. K=Fun("24","35")若需要在同一窗体内安排两组相互独立的单选按钮 可使用 控件做容器将它们分开 (OptionButton),④ Frame D. ③或④.①TextBox A. ①或② 第 48 题②PictureBox B. ②或③③ C. Image ②或④以下关于文件的叙述中，错误的是。
17～18下学期16动漫+16平面《VB程序设计》期末试卷答案卷
17～18下学期16动漫+16平面《VB程序设计》期末试卷答案卷姓名成绩注：考试时每位同学建立以自己姓名命名的文件夹，将自己的试卷及编程题需建立的窗体文件存入本人文件夹(本次编程题只需窗体文件即可)。
一、选择题：（每题1分，共40分，请将答案写在括号里）1.将命令按钮Command1设置为不可见，应修改该命令按钮的（）属性。
A.VisibleB.ValueC.CaptionD.Enabled2.下面控件中（）具有clear方法。
A.图片框B.窗体C.复选框D.列表框3.形状控件所显示的图形不可能是（）A.圆B.椭圆C.圆角正方形D.等边三角形4.下列数据类型中，占用内存最大的是（）A.BoolenB.ByteC.IntegerD.Single5.如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（）属性决定了该图片的颜色。
A.BackColorB.ForecolorC.FillcolorD.Dlawstyle6.要在垂直位置上移动控件，应利用控件的（）属性。
A.LeftB.WidthC.TopD.Height7. 设有如下变量声明：Dim a,b As Integer则以下叙述中正确的是A．a 和b都被声明为整形变量 B. a 和b都被声明为变体类型变量C．a被声明为整形变量，b都被声明为变体类型变量D．a被声明为变体类型变量，b都被声明为整形变量8. 语句A=B+C代表的意思是A.变量A等于B+C的值B.变量A等于B的值，然后再加上C的表达式C.将变量A存入变量存入B中，然后再加上C的表达式D.将变量A存入变量B+C中9. 下列程序执行的结果为x=25: y=20: z=7Print "S("; x + z * y; ")"A.S( 47 )B.S( 165 )C.S( 25+7*20 )D.S( 87 )10．组合框有三种风格，它们由Style属性所决定，其中为简单组合框时，Style属性值应为（）A.0B.1C.2D.311.下列可调整图片框的大小以适合图片的属性是（）A.StretchB.autosizeC.pictureD.oledropmode12.下列表达式中，其值为0的是（）A.7/9B.7mod 15C.7\9D.15 mod 913. 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是：（）="VisualBasic窗体"B. Form1.Title="VisualBasic窗体"C. Form1.Caption="VisualBasic窗体"D.Form1.Text="VisualBasic窗体”14. 下列叙述中正确的是( )A. InputBox 函数的函数返回值一定是字符型数据B. InputBox函数的函数值可以是数值型数据C. MsgBox函数的函数值可以是数值型数据D, MsgBox 函数的函数值可以是字符型数据15. 运行下列程序段后，显示的结果为J1=63J2=36If J1 < J2 Then Print J2 Else Print J1A.63B.36C.55D.233216.在一个应用程序窗体上，依次创建了bel等控件，则运行该程序显示窗体时，（）会首先获得焦点。
vb期末考试试题及答案
vb期末考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. DimB. DeclareC. SubD. Function答案：A2. VB中的Print方法默认输出到哪个控件？A. TextBoxB. LabelC. CommandButtonD. Form答案：D3. 下列哪个选项不是VB中的循环结构？A. ForB. WhileC. DoD. If答案：D4. 在VB中，以下哪个函数用于计算字符串的长度？A. LenB. StrCompC. UCaseD. LCase答案：A5. VB中的哪个控件用于显示和编辑文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：B6. VB中，以下哪个关键字用于定义类？A. ClassB. DimC. FunctionD. Sub答案：A7. 在VB中，以下哪个方法用于获取当前日期？A. Date()B. Now()C. Time()D. Today()答案：A8. VB中的哪个控件用于在窗体上显示图像？A. PictureBoxB. LabelC. TextBoxD. ComboBox答案：A9. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. BackColorD. Text答案：A10. VB中，以下哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的正确语法是________。
答案：Dim myVar As Integer2. VB中，用于定义子程序的关键字是________。
答案：Sub3. VB中，用于定义函数的关键字是________。
答案：Function4. VB中，用于定义属性的关键字是________。
计算机vb期末考试题及答案
计算机vb期末考试题及答案计算机VB期末考试题及答案一、选择题（每题2分，共20分）1. VB中的变量声明关键字是：A. DimB. DeclareC. VarD. Let答案：A2. 下列哪个不是VB中的控制结构？A. 顺序结构B. 选择结构C. 循环结构D. 模块结构答案：D3. VB中的数组声明方式是：A. Dim arr(10) As IntegerB. Dim arr = New Integer(10)C. Dim arr = Array(10)D. Dim arr = New Integer[10]答案：A4. 在VB中，以下哪个是正确的函数调用方式？A. Call Print("Hello World")B. Print("Hello World")C. Call Print "Hello World"D. Print "Hello World"答案：B5. 下列哪个是VB中的事件？A. SubB. FunctionC. EventD. Property答案：C...二、填空题（每空2分，共20分）1. 在VB中，使用________关键字声明常量。
答案：Const2. 一个VB程序的入口点是________过程。
答案：Sub Main3. 在VB中，使用________关键字定义类。
答案：Class4. VB中的________属性用于设置控件的可见性。
答案：Visible5. 在VB中，使用________方法可以清空文本框中的内容。
答案：Clear...三、简答题（每题10分，共20分）1. 简述VB中的类和对象的区别。
答案：类是一个模板，定义了对象的结构和行为，但本身不包含数据。
对象是根据类创建的具体实例，包含数据和行为。
2. 解释VB中的继承概念。
答案：继承是面向对象编程中的一个特性，允许一个类（子类）继承另一个类（父类）的属性和方法，而无需重新编写代码。
vb期末测试题及答案
vb期末测试题及答案一、选择题1. 下列哪个是VB的关键字？A. FunctionB. PrintC. OutputD. Process答案：A. Function2. VB中用于循环执行一段代码的语句是？A. If...ThenB. While...LoopC. For...NextD. Select...Case答案：C. For...Next3. VB中用于声明一个变量的关键字是？A. SetB. DimC. LetD. New答案：B. Dim4. 下列哪个不是VB中的数据类型？A. IntegerB. StringC. FloatD. DoubleFloat答案：D. DoubleFloat5. VB中的数组索引是从几开始的？A. 0B. 1C. -1D. 2答案：A. 0二、判断题1. VB是一种面向过程的编程语言。
答案：错误2. VB可以用于开发桌面应用程序。
答案：正确3. VB中的If语句只能进行简单的条件判断。
答案：错误4. VB中的控件可以通过拖拽方式添加到窗体上。
答案：正确5. VB中的事件处理程序可以在代码编辑器中直接编写。
答案：正确三、简答题1. 请简要介绍VB的历史及应用领域。
答案：VB（Visual Basic）是一种基于BASIC语言的高级编程语言，由微软公司开发。
VB于1991年发布，随后成为流行的Windows平台应用程序开发工具之一。
VB的应用领域主要包括开发桌面应用程序、数据库应用程序以及快速原型开发等。
2. 请简述VB中的函数和子过程的区别。
答案：VB中的函数和子过程都是一段用于完成特定任务的代码，但二者在使用和返回值方面有所不同。
函数可以接受参数并返回一个值，可以在程序中的任何地方调用并使用其返回值。
而子过程可以接受参数但不返回值，只会执行一系列的操作。
3. 请解释VB中的控件和容器的概念，并举例说明。
答案：在VB中，控件是指用于与用户进行交互的界面元素，如按钮、文本框、标签等。
VB期末标准试题4套及标准答案(格式绝对符合标准)
VB试卷（4）一、单项选择题（每题1分，总共20分）1、用一个对象来表示：“一只白色的足球被踢进球门”，那么，白色、足球、踢、进球门分别是（）。
（A）属性、对象、方法、事件（B）属性、对象、事件、方法（C）对象、属性、方法、事件（D）对象、属性、事件、方法2、要设置标签控件字体的大小，应设置其（）属性。
（A）Height（B）Width （C）Caption （D）Font3、使文本框获得“焦点”的方法是（）。
（A）LinkSend（B）Move （C）SetFocus （D）Refresh4、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条，原因是（）。
（A）文本框中没有内容（B）文本框的MultiLine=False（C）文本框的Locked=True （D）文本框的MultiLine=True5、表达式16/4-2^5*8/4 Mod 5\2 = ( )。
（A）14（B）4 （C）20 （D）26、随机产生[10，50] 之间整数的正确表达式是（）。
（A）Round( Rnd*51) （B）Int(Rnd*40+10)（C）Round( Rnd*50) （D）10+Int(Rnd*41)7、赋值语句A=123 + Mid$( “123456”,3,2) 执行后，A=（）。
（A）”12334”（B）123 （C）12334 （D）1578、Val (“123ab”)=（）。
（A）0（B）123 （C）1230 ( D ) 不能转换9、在VB中，要想在一行写多条语句，那么语句之间要用（）号分隔。
（A），（B）：（C）、（D）；10、下面哪个程序不能正确显示1！，2！，3！，4！的值_______________。
（A）for i=1 to 4 （B）for i=1 to 4n=1 for j=1 to ifor j=1 to I n=1n=n*j n=n*jnext j next jprint n print nnext i next i（C）n=1 （D）n=1 : j=1for j=1 to 4 do while j<5n=n*j n=n*jprint n print n : j=j+1next j loop11、数组的下标取值类型为（）。
计算机vb期末考试题及答案
计算机vb期末考试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中的哪个关键字用于声明变量？A. DimB. DeclareC. ConstD. Option答案：A3. 在VB中，以下哪个选项是正确的循环结构？A. ForB. WhileC. DoD. All of the above答案：D4. VB中用于结束一个子程序的关键字是什么？A. EndB. ExitC. ReturnD. Stop答案：B5. 在VB中，以下哪个选项是正确的文件访问模式？A. Open AsB. CloseC. GetD. Put答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的正确语法是________。
答案：Dim myVar As Integer2. 如果要将一个变量的值赋给另一个变量，可以使用________运算符。
答案：=3. VB中的________函数可以用来将字符串转换为数字。
答案：Val4. 在VB中，________函数可以用来获取系统当前的时间。
答案：Now5. 若要在VB中创建一个数组，可以使用________关键字。
答案：Dim三、简答题（每题10分，共30分）1. 请简述VB中的事件驱动编程的概念。
答案：事件驱动编程是一种编程范式，其中程序的执行流程由外部事件（如用户输入、系统消息等）触发，而不是按照预先定义的顺序执行。
2. 描述在VB中如何使用条件语句来控制程序的流程。
答案：在VB中，可以使用If...Then...ElseIf...Else结构来根据条件控制程序的流程。
如果条件为真，则执行If块中的代码；如果条件为假，则根据需要执行ElseIf或Else块中的代码。
3. 请解释VB中的错误处理机制。
答案：VB中的错误处理机制允许程序在遇到错误时，而不是立即崩溃，而是可以捕获错误并执行错误处理代码。
vb操作题期末考试题及答案
vb操作题期末考试题及答案一、选择题（每题2分，共10分）1. 在VB中，以下哪个关键字用于定义一个过程？A. FunctionB. SubC. IfD. For答案：B2. VB中，以下哪个函数用于计算两个日期之间的天数差？A. DateDiffB. DateAddC. NowD. Format答案：A3. 在VB中，以下哪个控件用于显示文本，但用户不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B4. VB中，以下哪个事件用于响应鼠标点击按钮的动作？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A5. 在VB中，以下哪个属性用于设置文本框（TextBox）的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A二、填空题（每题2分，共10分）1. 在VB中，使用________关键字可以定义一个变量。
答案：Dim2. VB中的________函数可以返回当前日期。
答案：Date3. 要使VB中的Label控件显示多行文本，需要设置其________属性为True。
答案：WordWrap4. VB中，使用________事件可以检测到文本框（TextBox）内容的变化。
答案：TextChanged5. 在VB中，使用________函数可以获取当前时间。
答案：Time三、简答题（每题5分，共20分）1. 简述VB中如何使用If...Then...Else语句进行条件判断。
答案：在VB中，可以使用If...Then...Else语句进行条件判断。
首先使用If关键字后跟条件表达式，如果条件为真，则执行Then后面的代码块；如果条件为假，则执行Else后面的代码块。
2. 描述VB中如何创建一个数组并为其赋值。
答案：在VB中，可以使用Dim关键字创建数组，并使用括号指定数组的维度。
vb期末考试试题(含答案)
《Visual Basic 程序设计》期末考试B卷(附3页答题纸，所有答案写在答题纸上，答题纸单独装订)一、填空题（每空0.5分，共10分）1、 Visual Basic应用程序的窗体文件的扩展名是（）。
2、在属性窗口，属性的显示方式有按（）顺序和按分类顺序。
3、 VB的控件是具有自己的（）、（）和（）的对象。
4、每当一个窗体称为活动窗体时，触发（）事件。
5、 Int(-3.5)的值是（）。
6、表达式（）产生10~90之间的随机整数（包括10和90）。
7、表达式（）表示x是5或者7的倍数。
8、下面程序段显示（）个”*”For i = 1 To 5For j = 2 To iPrint "*";Next jNext i9、获得数组的上界通过（）函数，要获得列表框list数组的元素总个数通过（）属性。
10、Visual Basic变量作用域分为（）、（）、全局变量。
11、在过程中定义的变量，如果想在离开该过程后，还能保存过程中局部变量的值，则应该使用（）关键字在过程中定义局部变量。
12、窗体frm中的全局整型变量x的声明位置在（）段，定义语句为（），在其他模块中存取式书写形式为（）。
13、假定有一个通用对话框控件CommonDialog1，除了用CommonDialog1.Action=1显示打开对话框之外，还可以用（）方法显示。
14、若已经建立了form1、form2两个窗体，默认启动窗体是form1，在程序中若要显示form2窗体，则执行（）语句。
二、选择题（每小题2分，共20分）1、 VB6.0集成开发环境中不能完成的功能是（）。
A、输入编辑源程序B、编译生成可执行程序C、调试运行程序D、自动改正程序中的错误2、有程序代码如下：text1.text=”text1.text”则text1、text、”text1.text”分别代表（）。
A、对象，值，属性B、对象，方法，属性C、对象，属性，值D、属性，对象，值3、要使命令按钮可见而不可操作，要对（）属性进行设置。
VB期末考试题及答案
VB期末考试题及答案VB期末考试题及答案一、选择题1、下列哪个属性用于设置按钮的背景颜色？ A. BackColor B. TextC. BorderStyleD. ForeColor2、在VB中，如何将一个消息框关闭？ A. MsgBox("Close") B. Close()C. Hide()D. Me.Close()3、下列哪个控件可以用来显示文本？ A. Label B. Button C. TextBox D. ComboBox4、下面哪个事件可以用于在用户点击按钮后触发？ A. Click B. DoubleClick C. MouseDown D. MouseUp5、下列哪个语句可以将两个数字相加并将结果存储在变量x中？ A. x = Num1 + Num2 B. Add(Num1, Num2, x) C. x = Num1 - Num2 D. Subtract(Num1, Num2, x)二、填空题6、VB中的语句"Dim x As Integer"用于声明一个整型变量________。
61、若要设置文本框中的文本内容，应使用________属性。
611、消息框的常用函数名是________。
6111、若要禁用某个按钮，可以使用________方法。
61111、若要在文本框中显示多行文本，应将________属性设置为MultiLine。
三、简答题11、简述什么是事件驱动编程。
111、请说明如何使用VB创建简单的窗体应用程序。
1111、写出一段VB代码，实现将两个数字相加并输出结果。
11111、什么是回调函数，请举例说明。
111111、请解释什么是异常处理。
四、编程题16、设计一个程序，要求实现以下功能：当用户点击一个按钮时，程序会弹出一个消息框，显示“Hello World！”的消息。
161、编写一个简单的VB程序，要求实现以下功能：用户输入两个数字，程序将它们相加并输出结果。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2017-2018学年第二学期期末考试Vb程序设计一、选择题(每个2分，共70分。
答案写在第四页答题卡内。
)1 下面选项中( )是字符连接运算符.A、&B、AndC、%D、Mod2 len("vb程序设计")=( ) 。
A、5B、2C、6D、103 表达式15 Mod4 + 13 \5 * 2 的值是A、7B、0C、2D、44 函数Int(10*Rnd)是在( )范围内的整数.A、[0,9]B、[0,1]C、[1,9]D、[1,10]5 表达式4+5 \6 *7 /8 Mod9 的值是( ).A、7B、4C、6D、56 设a=6,则执行x=IIf(a>5,-1,0)后,x的值为( ).A、5B、0C、6D、-17 声明符号常量应该用关键字( ).A、PrivateB、ConstC、StaticD、Variant8 删除字符串前导和尾随空格的函数是( ).A、Rtrim( )B、Ltrim()C、LcaseD、Trim()9 选中复选框控件时,value属性的值,可以是( ).A、TrueB、falseC、1D、010 程序运行时，如果复选框被用户选中，那么其Value属性值为（）。
A、1B、FalseC、TrueD、011 程序运行时，如果单选框被用户选中，那么其Value属性值为（）。
A、0B、1C、FalseD、True12 决定控件上文字的字体、字形、大小及效果的属性是( ).A、TEXTB、CAPTIONC、FONTD、NAME13、要使"命令按钮"在程序运行时不可见，可以将其（）属性设置为False。
A、CancelB、DefaultC、VisibleD、Enabled14、列表框和组合框的（）属性的值，表示其列表中项目的个数。
A、ListIndexB、ListCountC、ListD、Text 15、下面( )对象在运行时一定不可见.A、LineB、OptionC、TimerD、Text16、若要清除列表框的所有内容,可用什么方法实现( )A、以上均不可以B、ClsC、ClearD、RemoveItem17、要使时钟控件Timer1的Timer事件不起作用,以下正确的语句是( )A、Timer1.Enabled=FalseB、Timer1.Index=0C、Timer1.Interval=1000D、Timer1.Visible=False18、为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为( ).A、300B、5C、500D、500019、将数据项"China"添加到列表框(List1)中成为第一项应使用的语句是（）。
A、List1.AddItem〞China〞,0B、List1.AddItem〞China〞,1C、List1.AddItem 0, 〞China〞D、List1.AddItem 1,〞China〞20、循环结构For I%= -1 to -17 Step -2 共执行( )次.A、6B、5C、9D、821、下面程序段输出的结果是Private Sub Command1_Click()x = 8For i = 0 T o 20 Step 5x = x + iNextPrint "X="; xEnd SubA、X=50B、X=218C、X=210D、X=5822、引用列表框的最后一项应使用( ).A、List1.List(ListCount-1)B、List1.List(List1.ListCount)C、List1.List(ListCount)D、List1.List(List1.ListCount-1) 23．CheckBox控件被选中时，其value属性的值是（）A．True B.-1 C.1 D.False24．关于Visual Basic中控件属性的说法不正确是（）A．控件都有Name属性B．有些控件有相同的属性C．每个控件规定了一个默认属性，在对控件的这个属性进行操作时可不写属性名D．同一窗体中的同类控件，它们的属性值都一样25．vb语句Print Mid("ABCDEFG", 2, 3) = "123"的输出结果是（）A. FalseB. True C．A123EFG D. 12326. 当窗体被关闭时，系统自动执行该窗体的（）事件过程。
A、UnloadB、LoadC、LostFocusD、Click27. 执行下面Visual Basic程序后，结果是哪个选项（）For i = 1 T o 6If i Mod 2 = 0 ThenPrint "#";ElsePrint "*";End IfNext iA．###### B．******C．*#*#*#D．#*#*#*28. 执行下面Visual Basic程序，输入a的值为10，最后输出s的值是（）Dim a As IntegerDim s As Integera = InputBox("a=")Select Case a Mod 2Case 1: s = 1Case 2: s = 10Case 3: s = 11Case Else: s = 100End SelectPrint sA. 1B. 2C. 3D. 10029．有一个过程如下：Sub Cmax(x, y, max)max = IIf(x > y, x, y)End Sub调用过程如下：Private Sub Command1_Click()i = Val(InputBox("请输入第一个数"))j = Val(InputBox("请输入第二个数"))Cmax i, j, aPrint aEnd Sub程序运行后，分别输入12、56，结果为（）A. 12B. 56C.24D. 11230．在Visual Basic中，有如下程序段。
程序运行后，单击命令按钮，在输入对话框中依次输入25，33，55，66，输出结果是（）Private Sub Command1_Click()Dim x As Integer, y As Integer，a As Integerx = 100For i = 1 T o 4y = InputBox("请输入一个整数")If y Mod 5 = 0 Thena = a + yx = yElsea = a + xEnd IfNext iPrint aEnd SubA．160 B.100C．120 D．9031．当用户按键时KeyPress事件、KeyDown事件、KeyUp事件的执行顺序为( )A)KeyPress事件、KeyDown事件、KeyUp事件B)KeyDown事件、KeyPress事件、KeyUp事件C)KeyDown事件、KeyUp事件、KeyPress事件D)KeyDown事件、KeyUp事件与KeyPress事件32．编写程序代码如下：当程序运行后，为了在窗体上输出“Visual Basic”，应在窗体上执行以下操作：( )Option ExplicitPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Shift = 3 And Button = 2 ThenPrint "Visual Basic"End IfEnd SubA同时按下Ctrl+Shift和鼠标右键B同时按下Shift和鼠标右键C同时按下Ctrl+Shift和鼠标左键D同时按下Shift和鼠标左键33．在窗体中添加一个文本框，然后编写代码如下：Private Sub Text1_KeyPress(KeyAscii As Integer)Dim char As Stringchar = Chr(KeyAscii)KeyAscii = Asc(UCase(char))Text1.Text = String(3, KeyAscii)End Sub程序运行后，如果在键盘上输入字母“a”，则文本框中显示内容为( ) A)a B)A C)aaaa D)AAAA34．在窗体上画一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load()ShowText1.Text = "" Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)Print "程序设计"End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Print "Visual Basic"End Sub程序运行后，如果按“A”键，然后单击窗体，则在窗体上显示的内容是( ) A)Visual Basic B)程序设计C)A程序设计D)Visual Basic 程序设计35．对窗体编写如下事件过程：Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 ThenPrint "AAAAA"End IfEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)Print "BBBBB"End Sub程序运行后，如果单击鼠标右键，则输出结果为( )A)AAAAA B)BBBBB C)AAAAA D)BBBBBBBBBB AAAAA二、填空（每空2分，共30分。
答案直接写在横线上）1.表示x是5的倍数或是9的倍数的逻辑表达式为__ ___。
2.Int(-2.6)、Int(2.6)、Fix(-2.6)、Fix(3.6)的值分别是__ __、_____、_____、_____。
3.表达式93 \ 7 Mod 2 ^ 2 的值是__ ___。
4.表达式Ucase(Mid("abcdefgh",3,4))的值是__ ___。