第30卷课程综合卷 《Visual Basic 6.0程序设计》河南省对口招生《计算机与网络类考纲百套卷》

编写说明：河南省普通高校对口招生专业理论考试《计算机与网络类考纲百套卷》，依据《河南省普通高校对口招生计算机与网络类专业课考试纲要》编写。每门课程均分三层训练：基础层（具象化支架）拆解考点为微目标，紧扣考纲“掌握”“理解”要求编写考点训练卷；巩固层（关联性支架）强化知识交叉与场景关联，按考纲专题编专题训练卷；应用层（引导性支架）聚焦真题突破，结合知识模块与教材编写课程综合卷。 本试卷是第30卷，按《Visual Basic 6.0》范围和要求编写，考查Visual Basic 6.0程序设计模块知识的综合应用。 河南省《计算机与网络类考纲百套卷》第30卷 《Visual Basic 6.0》 课程综合卷 考试时间60分钟 满分120分 班级 姓名 学号 成绩 一、单项选择题（本大题共25小题，每题2分，共50分） 1.函数Ltrim（“”）的功能是（ ）。 A.去除字符串两边的空格 B.去除字符串右边的空格 C.去除字符串左边的空格 D.去除字符串所有的空格 【答案】C 【解析】Ltrim 函数中的“L” 代表“Left”，即左侧，因此其功能是去除字符串左侧的空格。 2.如果要输出“你好！”，那么下面语句会出现语法错误的是（ ）。 A.Print “你好！” B.Write “你好！” C.Text1.Text=“你好！” D.Print “大家好！” 【答案】B 【解析】在VB中，Write函数用于向文件中写入数据。 3.Visual Basic 工程的窗体模块文件扩展名是（ ）。 A..vbp B..bas C..cls D..frm 【答案】D 【解析】Visual Basic工程的窗体模块文件扩展名是‌.frm‌‌。 4.有如下函数过程： Function fun(a As Integer,n As Integer)As Integer Dim m As Integer While a>=n a=a-n m=m+1 Wend fun=m End Function 该函数的返回值是（ ）。 A.a乘以n的乘积 B.a加n的和 C.a减n的差 D.a除以n的商（不含小数部分） 【答案】D 【解析】函数接收两个整型参数a和n，定义变量m计数；While a >= n：只要a大于等于 n，就执行循环：a=a-n：用a不断减去n；m=m+1：每减一次，计数m加1；循环结束后，把计数m作为函数返回值，接着赋值100,会出现编译错误。 5.表达式 Abs(-1.5)的值是（ ）。 A.1 B.1.5 C.-1 D.-1.5 【答案】B 【解析】Abs是数学中的绝对值函数，绝对值表示一个数在数轴上离零点的距离，因此结果总是非负数（零或正数）。 6.变量a=8,b=5,执行t=a:a=b:b=t语句后,a和b的值分别是（ ）。 A.8 8 B.5 8 C.8 5 D.5 5 【答案】B 【解析】首先把8赋值给中间变量t,把5赋值给变量a,再把8赋值给b,实现a,b值得互换。 7.程序段：s=1 For i=1 To 10 Step 2 s=s*i i=i+1 Next i Print s,i 执行结束后，输出的结果是（ ）。 A.280 13 B.280 11 C.945 11 D.45 13 【答案】A 【解析】‌初始化‌：s=1，i=1；‌第一次循环‌：i=1，s=1*1=1 i=i+1=2 Next i自动加2，i=4；‌第二次循环‌：i=4，s=1*4=4 i=i+1=5 Next i加2，i=7；‌第三次循环‌：i=7，s=4*7=28 i=i+1=8 Next i加2，i=10；‌第四次循环‌：i=10，s=28*10=280 i=i+1=11 Next i加2，i=13；‌第五次循环‌：i=13，此时循环结束。 8.表达式 25 Mod 3+23\5*2 的值是（ ）。 A.0 B.2 C.6 D.3 【答案】D 【解析】Mod函数作用是取余运算，“\”是整除运算符，乘法运算优先级高于整除运算，所以25mod 3+23\5*2=1+23\10=1+2=3。 9.循环语句 For i=-3.5 To 5.5 Step -0.5 的循环次数是（ ）。 A.20 B.19 C.18 D.0 【答案】D 【解析】For循环语句中，当步长为负时要求初始值 i 大于等于终值，题中-3.5 < 5.5 不满足条件，故不执行循环‌。 10.表达式 Int(Rnd*50)的值的范围是（ ）。 A.[0,50] B.[0,49] C.[1,50] D.[1,49] 【答案】B 【解析】Rnd*50的范围是[0,50)，包括0，不包括50。Int函数对结果取整,会得到范围内的最大整数。因此,Int(Rnd*50)的最小值为0(当Rnd=0时)，最大值为49。 11.Chr(13) 表示（ ）。 A.空格符 B.换行符 C.回车符 D.退格 【答案】C 【解析】在ASCII标准中，回车符的ASCII码值为13。 12.可以用来画对角线的控件是（ ）。 A.Line控件 B.Shape控件 C. 图像控件 D.图像框控件 【答案】A 【解析】Line控件是一个图形控件，用于在窗体上显示水平线、垂直线或对角线。 13.以下叙述中错误的是（ ）。 A.Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性 B.Visual Basic应用程序不具有明显的开始和结束语句 C.Visual Basic是事件驱动型可视化编程工具 D.Visual Basic中控件的某些属性只能在运行时设置 【答案】A 【解析】Visual Basic工具箱中的所有控件并不都具有宽度(Width)和高度(Height)属性‌。如Timer和CommonDialog控件不具备Width和Height属性，因为这些控件在运行时不可见，无需调整尺寸‌。 14.当用户按下键盘字母F键并松开时，触发的事件是（ ）。 A.KeyPress B.KeyDown C.Click D.MouseMove 【答案】A 【解析】KeyPress事件是当用户按下和释放一个ANSI键时发生。 15.选择颜色函数QBColor能够选择的颜色数为（ ）。 A.255 B.64 C.32 D.16 【答案】D 【解析】QBColor函数能够选择的颜色数代号为0-15，共计16个。 16.程序运行时想要显示“打开”对话框，应该调用CommonDialog控件的（ ）。 A.ShowOpen方法 B.ShowSave方法 C.ShowColor方法 D.ShowFont方法 【答案】A 【解析】ShowOpen：弹出打开文件对话框；ShowSave：弹出另存为对话框；ShowColor：弹出颜色选择对话框；ShowFont：弹出字体设置对话框。 17.程序段： Private Sub Form_Load( ) Me.Caption=Now End Sub 的功能是（ ）。 A.在窗体中显示当前日期和时间 B.在窗体标题栏上显示当前日期和时间 C.在窗体标题栏上仅显示当前日期 D.在窗体标题栏上仅显示当前时间 【答案】B 【解析】Me.Caption代表窗体标题栏文字；Now函数会返回系统当前日期和时间。故程序的功能是在窗体标题栏显示当前日期和时间。 18.下列关于变量的初始化描述中不正确的是（ ）。 A.数值型变量初始化为0 B.字符型变量初始化为空字符串 C.变体型变量初始化为空串 D.布尔型变量初始化为true 【答案】D 【解析】布尔型 (Boolean) 默认值为False，不是True。 19.图片框控件 PictureBox 不包含的属性是（ ）。 A.Picture B.Name C.BackColor D.Stretch 【答案】D 【解析】PictureBox控件没有"Stretch" 的直接属性。它的图像拉伸功能是通过SizeMode属性来控制的，当需要拉伸图像时，应将SizeMode属性设置为StretchImage。 20.下列关于For…Next语句的说法正确的是（ ）。 A.循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只为正数 C.初值必须小于终值 D.初值必须大于终值 【答案】A 【解析】步长可以是正数也可以是负数，B错误；初值可大于、小于或等于终值，配合正负步长控制循环，C和D 错误。 21.指令“ Circle (1000,1000),500, ,-6,-3”将绘制（ ）。 A.画圆 B.椭圆 C.扇形 D.圆弧 【答案】C 【解析】VB中Circle语法：Circle (x,y), 半径, 颜色, 起始角, 终止角；角度加负号表示绘制半径线，结合起止角度-6、-3，会画出带两条半径的扇形。 22.语句Dim arr(2 to 6,-2 to 4)As Integer 声明的数组元素个数为（ ）。 A.28 B.30 C.35 D.42 【答案】C 【解析】数组维度计算规则：元素个数=上界-下界+1；第一维 2 To 6：6−2+1=5 个；第二维 -2 To 4：4−(−2)+1=7 个；总元素数：5×7=35。 23.在窗体中画一个名称为 Timer1 的计时器控件，要求每隔0.5s发生一次计时器事件，则下列语句正确的是（ ）。 A.Timerl.Interval=0.5 B.Timerl.Interval=500 C.Timerl.Interval=50 D.Timerl.Interval=5 【答案】B 【解析】Interval属性表示计时器事件触发的时间间隔，以毫秒为单位，0.5秒=500毫秒，因此需设置为500。 24.在设计基于Windows的应用程序时，下面关于创建对话框方法错误的是（ ）。 A.使用MsgBox或InputBox函数的代码可以创建预定义对话框 B.使用标准窗体或自定义已存在的对话框创建自定义对话框 C.使用CommonDialog控件可创建标准对话框，如“打印”和“打开文件” D.使用window.showModelessDialog()创建对话框 【答案】D 【解析】window.show Modeless Dialog() 是JavaScript（网页前端） 的语法，并非 Windows 桌面VB应用程序创建对话框的方式。 25.数据控件默认连接的数据库类型是( )。 A.MDB B.XLS C.DBF D.ODBC 【答案】A 【解析】Connect:用于设置数据控件要连接的数据库类型,默认的数据库类型是 Access的 MDB文件,也可以连接 DBF、XLS和 ODBC等类型的数据源。 二、判断题（本大题共10小题，每题2分，共20分） 26.当RecordSet对象的BOF属性为True时，表示记录指针指向RecordSet对象的第一条记录之前。（ ） 【答案】√ 27.在Visual Basic 6.0中，声明一个数组应使用关键字“Dim”，并指定数组名和大小。（ ） 【答案】√ 28.在 Visual Basic 6.0中， 当窗体第一次显示或窗体的外观尺寸被改变时会发生 Resize事件。 ( ) 【答案】√ 29.在Visual Basic 6.0中，函数 Len("abcd"+space(5))的值是 5。 （　　） 【答案】X 30.标签控件能够响应多个鼠标事件，但由于标签所显示的文本不能被编辑，因此标签不能获得焦点，也不能响应与焦点相关的事件和键盘事件。（ ） 【答案】X 31.在Visual Basic 6.0中，用Line方法画直线或矩形，并不是非要指定直线或矩形的起点坐标。（ ） 【答案】√ 32.在Visual Basic 6.0中，标准工具箱窗口中的所有图标均代表可用的控件组件。（ ） 【答案】√ 33.使用Cls方法可以清除窗体上的控件，比如文本框(TextBox)或按钮(CommandButton)。（ ） 【答案】X 34.在 Visual Basic 6.0 中，MouseMove事件会在鼠标移动时触发，但并非每个像素都会生成事件。（ ） 【答案】√ 35.FSO对象模型支持通过TextStream对象来创建和操作文本文件。但是,它还不支持二进制文件的创建和操作。（ ） 【答案】√ 三、名词解释题（本大题共4题，每题4分，共16分） 36.DblClick事件 【答案】 当在一个对象上按下和释放鼠标按钮并再次按下和释放鼠标按钮时，发生DblClick事件。 37.Msgbox函数 【答案】Msgbox函数可以弹出一个对话框来显示消息，此时将等待用户单击按钮，并返回一个整数告诉用户单击的是哪个按钮。 38.目录列表框控件 【答案】 目录列表框控件(Dirlistbox)在运行时显示目录和路径,这个控件可以用于显示分层的目录列表。 39.逻辑错误 【答案】 逻辑错误是最难以处理的一种错误。程序可以正常执行,但得不到所希望的结果。这不是程序语句的错误,而是由于程序设计时本身存在的逻辑缺陷导致的。 四、简答题（本大题共4小题，每题5分,共20分） 40.Visual Basic 6.0中，动态数组与定长数组有何不同。 【答案】 (1)动态数组可以用 ReDim 多次声明，定长数组只能用 Dim 声明一次。 (2)动态数组的元素个数可以改变，而定长数组的元素个数保持不变。 (3)动态数组在声明时下标可以是变量，定长数组的下标只能是常量。 (4)动态数组可以用Erase 收回内存空间，定长数组用Erase 删除内容。 【解析】本题主要考查Visual Basic 6.0中动态数组与定长数组的不同。 41.简述窗体的常用属性并简要介绍。 【答案】 (1)Caption:用于设置显示窗体的标题。 (2)BackColor:用于设置窗体的背景顔色， (3)ForeColor:用于设置窗体的前景颜色，该属性改变窗体中图形和文本的颜色。 (4)FontName：用于设置窗体中显示文本所用的字体。 (5)FontSize：用来设置窗体中显示文本所用的字体的大小。 (6)CurrentX.CurrentY：用来设置下一次打印或绘图方法的水平或垂直坐标。 (7)KeyPreview:窗体的KeyPreview属性是用来返回或设置一个值，以决定是否在控件的键盘事件之前激活窗体的键盘事件。 (8)窗体的ScaleHeight和SealeWidth属性：它们分别用来返回窗体内部的宽度和高度。 (9)Width：窗体的宽度，包括边框厚度。 (10)Height：窗体的高度，包括菜单或标题等高度。 说明:本题只要列出6种即可。 【解析】本题考查Visual Basic 6.0中窗体的常用属性。 42.简述清除随机访问文件中删除记录的步骤。 【答案】 清除随机访问文件中删除记录的步骤是： (1)创建一个新文件； (2)把有用的所有记录从原文件复制到新文件； (3)关闭原文件并用Kill语句删除它； (4)使用Name语句把新文件以原文件的名字重新命名。 【解析】本题考查清除随机访问文件中删除记录的步骤。 43.简述多文档界面(MDI)应用程序的特性。 【答案】 多文档界面(MDI)应用程序的特性有： （1）所有子窗体均显示在MDI窗体的工作空间内; （2）当最小化一个子窗体时,它的图标将显示在MDI窗体上而不是在任务栏中; （3）当最大化一个子窗体时,它的标题会与MDI窗体的标题合并在一起并显示于MDI窗体的标题栏上。 【解析】本题考查多文档界面(MDI)应用程序的特性。 。 五、综合题（每题14分,共14分） 44.编写一个程序，10个评委为选手打分，去掉一个最高分和一个最低分，求平均分。(评委打分为 1-10 之间随机整数) 。 【答案】 Dim i As Integer, j As Integer Dim max As Integer, min As Integer Dim s As Integer, p As Integer Dim a(1 To 10) As Integer For i = 1 To 10 a(i) = Int((10 - 1 + 1) * Rnd + 1) Print a(i); s = s + a(i) Next i max = a(1): min = a(1) For i = 2 To 10 If max < a(i) Then max = a(i) If min > a(i) Then min = a(i) Next i s = s - max - min p = s / 8 Print p 【解析】本题主要考查For语句的语法结构。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $ 编写说明：河南省普通高校对口招生专业理论考试《计算机与网络类考纲百套卷》，依据《河南省普通高校对口招生计算机与网络类专业课考试纲要》编写。每门课程均分三层训练：基础层（具象化支架）拆解考点为微目标，紧扣考纲“掌握”“理解”要求编写考点训练卷；巩固层（关联性支架）强化知识交叉与场景关联，按考纲专题编专题训练卷；应用层（引导性支架）聚焦真题突破，结合知识模块与教材编写课程综合卷。 本试卷是第30卷，按《Visual Basic 6.0》范围和要求编写，考查Visual Basic 6.0程序设计模块知识的综合应用。 河南省《计算机与网络类考纲百套卷》第30卷 《Visual Basic 6.0》 课程综合卷 考试时间60分钟 满分120分 班级 姓名 学号 成绩 一、单项选择题（本大题共25小题，每题2分，共50分） 1.函数Ltrim（“”）的功能是（ ）。 A.去除字符串两边的空格 B.去除字符串右边的空格 C.去除字符串左边的空格 D.去除字符串所有的空格 2.如果要输出“你好！”，那么下面语句会出现语法错误的是（ ）。 A.Print “你好！” B.Write “你好！” C.Text1.Text=“你好！” D.Print “大家好！” 3.Visual Basic 工程的窗体模块文件扩展名是（ ）。 A..vbp B..bas C..cls D..frm 4.有如下函数过程： Function fun(a As Integer,n As Integer)As Integer Dim m As Integer While a>=n a=a-n m=m+1 Wend fun=m End Function 该函数的返回值是（ ）。 A.a乘以n的乘积 B.a加n的和 C.a减n的差 D.a除以n的商（不含小数部分） 5.表达式 Abs(-1.5)的值是（ ）。 A.1 B.1.5 C.-1 D.-1.5 6.变量a=8,b=5,执行t=a:a=b:b=t语句后,a和b的值分别是（ ）。 A.8 8 B.5 8 C.8 5 D.5 5 7.程序段：s=1 For i=1 To 10 Step 2 s=s*i i=i+1 Next i Print s,i 执行结束后，输出的结果是（ ）。 A.280 13 B.280 11 C.945 11 D.45 13 8.表达式 25 Mod 3+23\5*2 的值是（ ）。 A.0 B.2 C.6 D.3 9.循环语句 For i=-3.5 To 5.5 Step -0.5 的循环次数是（ ）。 A.20 B.19 C.18 D.0 10.表达式 Int(Rnd*50)的值的范围是（ ）。 A.[0,50] B.[0,49] C.[1,50] D.[1,49] 11.Chr(13) 表示（ ）。 A.空格符 B.换行符 C.回车符 D.退格 12.可以用来画对角线的控件是（ ）。 A.Line控件 B.Shape控件 C. 图像控件 D.图像框控件 13.以下叙述中错误的是（ ）。 A.Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性 B.Visual Basic应用程序不具有明显的开始和结束语句 C.Visual Basic是事件驱动型可视化编程工具 D.Visual Basic中控件的某些属性只能在运行时设置 14.当用户按下键盘字母F键并松开时，触发的事件是（ ）。 A.KeyPress B.KeyDown C.Click D.MouseMove 15.选择颜色函数QBColor能够选择的颜色数为（ ）。 A.255 B.64 C.32 D.16 16.程序运行时想要显示“打开”对话框，应该调用CommonDialog控件的（ ）。 A.ShowOpen方法 B.ShowSave方法 C.ShowColor方法 D.ShowFont方法 17.程序段： Private Sub Form_Load( ) Me.Caption=Now End Sub 的功能是（ ）。 A.在窗体中显示当前日期和时间 B.在窗体标题栏上显示当前日期和时间 C.在窗体标题栏上仅显示当前日期 D.在窗体标题栏上仅显示当前时间 18.下列关于变量的初始化描述中不正确的是（ ）。 A.数值型变量初始化为0 B.字符型变量初始化为空字符串 C.变体型变量初始化为空串 D.布尔型变量初始化为true 19.图片框控件 PictureBox 不包含的属性是（ ）。 A.Picture B.Name C.BackColor D.Stretch 20.下列关于For…Next语句的说法正确的是（ ）。 A.循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只为正数 C.初值必须小于终值 D.初值必须大于终值 21.指令“ Circle (1000,1000),500, ,-6,-3”将绘制（ ）。 A.画圆 B.椭圆 C.扇形 D.圆弧 22.语句Dim arr(2 to 6,-2 to 4)As Integer 声明的数组元素个数为（ ）。 A.28 B.30 C.35 D.42 23.在窗体中画一个名称为 Timer1 的计时器控件，要求每隔0.5s发生一次计时器事件，则下列语句正确的是（ ）。 A.Timerl.Interval=0.5 B.Timerl.Interval=500 C.Timerl.Interval=50 D.Timerl.Interval=5 24.在设计基于Windows的应用程序时，下面关于创建对话框方法错误的是（ ）。 A.使用MsgBox或InputBox函数的代码可以创建预定义对话框 B.使用标准窗体或自定义已存在的对话框创建自定义对话框 C.使用CommonDialog控件可创建标准对话框，如“打印”和“打开文件” D.使用window.showModelessDialog()创建对话框 25.数据控件默认连接的数据库类型是( )。 A.MDB B.XLS C.DBF D.ODBC 二、判断题（本大题共10小题，每题2分，共20分） 26.当RecordSet对象的BOF属性为True时，表示记录指针指向RecordSet对象的第一条记录之前。（ ） 27.在Visual Basic 6.0中，声明一个数组应使用关键字“Dim”，并指定数组名和大小。（ ） 28.在 Visual Basic 6.0中， 当窗体第一次显示或窗体的外观尺寸被改变时会发生 Resize事件。 ( )29.在Visual Basic 6.0中，函数 Len("abcd"+space(5))的值是 5。 （　　） 30.标签控件能够响应多个鼠标事件，但由于标签所显示的文本不能被编辑，因此标签不能获得焦点，也不能响应与焦点相关的事件和键盘事件。（ ） 31.在Visual Basic 6.0中，用Line方法画直线或矩形，并不是非要指定直线或矩形的起点坐标。（ ） 32.在Visual Basic 6.0中，标准工具箱窗口中的所有图标均代表可用的控件组件。（ ） 33.使用Cls方法可以清除窗体上的控件，比如文本框(TextBox)或按钮(CommandButton)。（ ） 34.在 Visual Basic 6.0 中，MouseMove事件会在鼠标移动时触发，但并非每个像素都会生成事件。（ ） 35.FSO对象模型支持通过TextStream对象来创建和操作文本文件。但是,它还不支持二进制文件的创建和操作。（ ） 三、名词解释题（本大题共4题，每题4分，共16分） 36.DblClick事件 37.Msgbox函数 38.目录列表框控件 39.逻辑错误 四、简答题（本大题共4小题，每题5分,共20分） 40.Visual Basic 6.0中，动态数组与定长数组有何不同。 41.简述窗体的常用属性并简要介绍。 42.简述清除随机访问文件中删除记录的步骤。 43.简述多文档界面(MDI)应用程序的特性。 五、综合题（每题14分,共14分） 44.编写一个程序，10个评委为选手打分，去掉一个最高分和一个最低分，求平均分。(评委打分为 1-10 之间随机整数) 。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $