VB试卷一全.doc

一、单项选择题（35道小题，共70分）1、表达式 25.28 Mod 6.99 的值是 。（2分）A、1B、4C、5D、出错2、用Open语句打开一个随机文件时，若省略“Len记录长度”，则记录的长度为（2分）A、64B、128C、256D、10243、实现参数的传值方式的关键字为（2分）A、ByRefB、ByValC、ByDataD、ByNum4、在程序中使用过程的主要目的是（2分）A、提高程序的可读性B、提高程序的运行速度C、便于程序移植D、模块化编程5、文本文件的正确叙述是（2分）A、每一条记录可长可短B、记录之间以“Tab”字符间隔C、文本文件最适合使用二进制模式D、文本文件可以按行、列随机访问6、当组合框的Style属性设置为0时，其表现形式为（2分）A、下拉列表框B、下拉组合框C、简单组合框D、文本框7、下面不支持DblClick事件的控件是（2分）A、OptionButtonB、CheckBoxC、FormD、Image8、窗体文件的扩展名（）。（2分）A、basB、vbpC、exeD、frm9、在窗体上建立了一个控件命令数组，控件数组名是C1，程序执行时单击第三个控件命令按钮，则执行的事件过程是。（2分）A、command1click()B、C1click()C、command3click()D、C3click()10、下列程序运行的结果是（ ）。Private Sub FormLoad() ：Dim a() : a Array(1, 2, 3, 4, 5, 6) : Print a(a(3): End Sub （2分）A、4B、5C、6D、311、对于Visual Basic的循环语句，下列正确的说法是： 。（2分）A、DoWhileLoop循环的循环体至少被执行一次；B、DoUntilLoop循环的循环体至少被执行一次；C、DoLoopUntil循环的循环体至少被执行一次；D、WhileWend循环的循环体至少被执行一次。12、下列能返回文件字节数的函数为（2分）A、EOF（）B、LOF（）C、Long（）D、SizeOf（）13、将窗体的前景色设置为蓝颜色的过程是。（2分）A、Form1.ForeColorVbblueB、Form1.ForeColorblueC、Form1.ForeColorGreenD、Form1.ForeColor“blue”14、对于过程Sub SSS（x,y,z），下列所有参数都以传址方式进行的调用为（2分）A、CallSSS（3，5，z）B、CallSSS（x+3，y+5，z）C、CallSSS（x，y，z）D、CallSSS（x+y，xy，z）15、退出Visual Basic的快捷键是()。（2分）A、Ctrl+QB、Shift+QC、Alt+QD、Ctrl+Alt+Q16、下列关于局部变量的错误叙述为（2分）A、在过程内不加声明直接使用的变量B、在过程内用Dim声明的变量C、只能在定义的过程内使用D、过程调用结束，内存单元保留17、设菜单项名称为M，若想运行时是该菜单项变为灰色（失效），应使用语句为（2分）A、MEnabledFalseB、MEnabledTrueC、MVisibleFalseD、MVisibleTrue18、下列关于Sub过程的正确说法为（2分）A、必须有一个EndSub语句B、必须有一个Private关键字C、必须有一个ExitSub语句D、可以使用GoTo语句退出Sub过程19、将数据项“hello”添加到列表框（Listl）中成为第一项应使用的语句为（2分）A、Listl.AddItem“hello”,0B、Listl.AddItem“hello”,1C、Listl.AddItem0,”hello”,0D、Listl.AddItem1,”hello”20、对于如下结构的循环： Do : 循环体 : Loop Until 条件，则下列正确的叙述是： 。（2分）A、如果“条件”为常数0，则只执行一次循环体；B、如果“条件”为常数-1，则至少执行二次循环体；C、如果“条件”为常数-1，则只执行一次循环体；D、如果“条件”为常数0，则一次循环体也不执行。21、下列符号常量的声明中，不合法的是（2分）A、ConstaAsSingle1.1B、ConstaAsInteger12C、ConstaAsDoubleSin(1)D、ConstaOK22、下列关于全局变量的正确叙述为（2分）A、在“通用声明”段中用Dim声明的变量 B、在“通用声明”段中用Private声明的变量C、在“通用声明”段中用Public声明的变量 D、在“通用声明”段中用Static声明的变量23、如果列表框（Listl）中没有被选定的项目，则执行Listl.Remove Item Listl. ListIndex语句的结果是（2分）A、移去第一项B、移去最后一项C、移去最后加入列表的一项D、以上都不对24、当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件，这三个事件发生的顺序是（2分）A、KeyPress、KeyDown、KeyUpB、KeyDown、KeyUp、KeyPressC、KeyDown、KeyPress、KeyUpD、没有规律25、下列语句中，循环体部分被执行的次数为：( ) 。For i 3 To 100 Step 9: Print i :Next i （2分）A、10B、12C、11D、926、Redim可以定义的数组是（2分）A、永久数组B、静态数组C、多维数组D、临时数组27、复选框的Value属性为0时，表示（2分）A、复选框未被选中B、复选框内有灰色的勾C、复选框被选中D、复选框操作有错误28、根据数据的编码方式，下列正确的分类为（2分）A、文本文件和随机文件B、顺序文件和二进制文件C、顺序文件和随机文件D、ASCII文件和二进制文件29、为了添加ComboBox控件中的项目，需要使用的方法为（2分）A、AddB、RemoveC、AddItemD、RemoveItem30、对于实参和形参，错误的叙述为（2分）A、实参把数据传递给形参B、实参可以把地址传递给形参C、实参可以把自己的数值传递给形参D、形参把结果值再传递给实参31、有以下程序代码，Form1.print 210，其中Form1，print， 210 分别代表( )。（2分）A、对象，方法和值B、对象，属性和值C、对象，属性和方法D、方法，对象和值32、表达式Turbo + C True + Basic的值是（2分）A、TrueB、FalseC、NullD、出错信息33、已知下列程序段：a 3: b 4: Print b a，输出的结果是 。（2分）A、TrueB、FalseC、43D、显示出错信息34、下列符号中，属于Visual Basic合法变量名的是（2分）A、x23B、8xyC、ENDD、X8B35、为窗体的Click事件编写一个过程如下：Private Sub FormClick() : Sum 0: i 1: While i 100: Sum Sum + i : Wend: Print Sum: End Sub，运行程序时，鼠标左键单击窗体时，窗体上显示内容为： 。（2分）A、一个无穷大的数B、5050C、死循环，直到溢出D、4950二、简答题（2道小题，共10分）1、Rem和单撇号有什么不同？答：VB中可以用Rem或单撇号“”注释开头语句，两者没什么主要区别，语句后面使用单撇号注释；如果要注释多行语句，可以使用“编辑”工具栏中的设置注释块完成。2、自由类型数组的作用是什么？答：自由类型数组可以方便的存储不同类型的数据，并以最紧凑的表示正确记录这些数据。三、编程题（2道小题，共20分）1、找出1000以内所有的个位数为3素数，并统计其个数。（10分）请将你解答本题所写的源程序粘贴到下面Private Sub formClick()Dim i, j, a, bFor i 3 To 993 a False For j 1 To i - 1 If i Mod j 0 And j 1 Then a True Exit For End If Next j If a False And Right(CStr(i), 1) 3 Then b b + 1 Print i, If b Mod 5 0 Then Print End IfNext iPrintPrint 1000以内个位数是3的素数共有 & b & 个End Sub2、编写程序，用牛顿切线法求方程f(x)x3+4x2-80（其中表示幂运算）在区间0，2上的近似实根r，迭代初值自选，精确到0.0001。提示:计算公式为xx-f(x)/f(x)（10分）请将你解答本题所写的源程序粘贴到下面Private Sub formClick()Dim x As DoubleDim y1 As DoubleDim