试卷编号：9337所属语言：Visual Basic试卷方案：VB_考试试卷总分：100分共有题型：5种一、填空共6题（共计18分）第1题（3.0分）题号:286 难度:中第5章拖动滚动条中的滚动框将会产生Scroll和【1】事件.第2题（3.0分）题号:223 难度:中第3章把整型数1赋给一个逻辑型变量,则逻辑变量的值为【1】.第3题（3.0分）题号:232 难度:中第3章表达式93\7 MOD 2^3的值是【1】.第4题（3.0分）题号:50 难度:中第2章在VB 6.0中,设 Single型变量 XYZ 的值为123.45,若要将其转换成字符串,应使用的类型转换函数是【1】.第5题（3.0分）题号:318 难度:中第6章由For k=35 to 0 step 3:next k循环语句控制的循环次数是【1】.第6题（3.0分）题号:277 难度:中第5章如果在模块的声明段中有Option Base 1语句,则在该模块中使用Dim a(3 To 5,6)声明的数组有【1】个元素.二、判断共12题（共计12分）第1题（1.0分）题号:304 难度:中第5章设计菜单中每一个菜单项分别是一个控件,每个控件都有自己的名字.第2题（1.0分）题号:309 难度:中第5章所有的对象都有caption 属性.第3题（1.0分）题号:366 难度:中第8章函数过程(Function Procedure)用来完成特定的功能,但不返回相应的结果.第4题（1.0分）题号:262 难度:中第5章VB允许用户使用Type语句在窗体模块的通用声明中自己定义数据类型.第5题（1.0分）题号:322 难度:中第5章已知窗的fillcolor=rgb(255,0,0)红,forecolor=rgb(0,255,0)绿,fillstyle=0(solid)语句circle(200,100),500,,,,2的输出结果是红边绿心的长椭圆.第6题（1.0分）题号:246 难度:中第5章ActiveX控件是扩展名为*.ocx的独立文件,使用时需用"工程"/"部件"载入或移去.第7题（1.0分）题号:369 难度:中第8章如果在过程调用时使用按值传递参数,则在被调过程中可以改变实参的值.第8题（1.0分）题号:293 难度:中第5章每个对象都有一系列预先定义好的对象事件,但要使对象能响应具体的事件,则编写该对象相应的事件过程.第9题（1.0分）题号:233 难度:中第3章全局变量用global或public关键字声明,且仅在通用声明处可以定义.第10题（1.0分）题号:260 难度:中第5章VB若同一个工程有许多窗体,可以指定任一窗体为启始窗体.答第11题（1.0分）题号:265 难度:中第5章菜单每一菜单项都是控件,可以通过点击菜单项或通过光标选择并按回车键,以触发Click事件.第12题（1.0分）题号:280 难度:中第5章方法是VB 对象可以响应的用户操作.三、单选共10题（共计20分）第1题（2.0分）题号:1771 难度:中第4章InputBox函数返回的函数值的类型是().A:数值B:字符串C:数值或字符串D:根据需要可以是任何类型数据第2题（2.0分）题号:866 难度:中第6章由For k=35 to 0 step 3:next k循环语句控制的循环次数是(). A:0B:12C:-11D:-10第3题（2.0分）题号:2391 难度:中第3章语句PRINT"INT(-13.2)";INT(-13.2)的输出结果为().A:INT(-13.2)=-13.2B:INT(-13.2)=13.2C:INT(-13.2)=-13D:INT(-13.2)=-14第4题（2.0分）题号:2408 难度:中第2章()对象不能作为控件的容器.A:FormB:PictureBoxC:ShapeD:Frame第5题（2.0分）题号:867 难度:中第7章用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是(). A:6B:7C:8D:9第6题（2.0分）题号:3750 难度:中第5章货币型数据需()字节.A:2B:4C:6D:8第7题（2.0分）题号:2288 难度:中第3章Line(100,100)-Step(400,400)将在窗体()画一直线.A:(200,200)到(400,400)B:(100,100)到(300,300)C:(100,100)到(500,500)D:(100,100)到(400,400)第8题（2.0分）题号:853 难度:中第5章在一个语句行内写多条语句时,语句之间应该用()分隔.A:逗号B:分号C:顿号D:冒号第9题（2.0分）题号:809 难度:中第5章要使文本框中的文本显示掩码(密码)符,在属性设置时,首先必须设置()属性为False.A:TextB:EnabledC:VisibleD:Multiline第10题（2.0分）题号:3450 难度:中第3章语句listl.removeitem 1 将删除list.listindext等于()的项目.. A:0B:2C:3D:1四、程序填空共2题（共计20分）第1题（10.0分）题号:932 难度:中第1章'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'题目：程序功能如下：' ①考生文件夹下in4.dat文件中存有20个考生的考号及数学和语文单科考试成绩。
' 单击"读数据"按钮，可以将in4.dat文件内容读入到20行3列的二维数组a中，' 并同时在Text1文本框内显示。
'②单击"统计"按钮，则对考生数学和语文的平均分在"优秀"、"通过"和"不通过"三个分数段的人数进行统计，' 并将人数统计结果在控件数组Text2中相应位置显示。
其中，平均分在85分以上(含85分)为"优秀"，' 平均分在60 85分之间(含60分)为"通过"，平均分在60分以下为"不通过"。
'-------------------------------------------------------Option Base 1Dim a(20, 3) As IntegerPrivate Sub Command1_Click()Open App.Path & "\in4.dat" For Input As #1For i = 1 To 20For j = 1 To 3Input #1, a(i, j)Text1 = Text1 + Str(a(i, j)) + Space(4)Next jText1 = Text1 + Chr(13) + Chr(10)Next iClose #1End SubPrivate Sub Command2_Click()Dim x(3) As IntegerFor i = 1 To 20'**********SPACE**********【?】 = (a(i, 2) + a(i, 3)) / 2Select Case Avg'**********SPACE**********Case 【?】x(1) = x(1) + 1'**********SPACE**********Case 【?】x(2) = x(2) + 1Case Is < 60x(3) = x(3) + 1End SelectNext iFor n = 1 To 3'**********SPACE**********Text2(【?】) = x(n)Next nEnd SubPrivate Sub Form_Load()End Sub第2题（10.0分）题号:38 难度:中第1章'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：下面的程序段，用于实现在一个nXm的矩阵中，找出值最' 大的元素所在的行和列，并输出其值及行号和列号。
'------------------------------------------------------- Private Sub Form_Click()Dim mat() As IntegerDim n as integer, m As Integern = Val(InputBox("请输入矩阵的行数"))m = Val(InputBox("请输入矩阵的列数"))'**********SPACE**********【?】For i = 1 To nFor j = 1 To mmat(i, j) = InputBox("请输入数组元素值")mat(i, j) = Val(mat(i, j))Next jNext iPrint "所建立的矩阵为"For i = 1 To nFor j = 1 To mPrint mat(i, j);Next jPrintNext iMax = mat(1, 1)For i = 1 To nFor j = 1 To m'**********SPACE**********If 【?】 ThenMax = mat(i, j)col = j'**********SPACE**********【?】End IfNext jNext iPrintPrint "矩阵最大的元素的值为："; mat(row, col)Print "它所在的行号为："; row; "列号为："; colEnd Sub五、VB窗体设计共2题（共计30分）第1题（15.0分）题号:29 难度:中第1章------------------------------------------------【窗体设计】------------------------------------------------题目：请按照题目要求设计指定的窗体。