2013年VB程序设计教程期末考试(第1次)

【ZZJ网上考试系统 v10.1】 郑州大学远程教育学院 （学期：122）

考试课程:6518.Visual Basic程序设计(第1次考试) 考试时间:120分钟 考场: 考试日期:2013-04-01

本卷共有3大题。

一、单项选择题（35道小题，共70分） 1、在通用对话框中，打开“颜色对话框”的方法是（2分） A、ShowColor B、ShowOpen C、ShowFont D、ShowSave 2、InStr(\程序设计简明教程中关于可视化界面的设计\设计\的函数值为（2分） A、15 B、17 C、30 D、47 3、有以下程序代码， Label1.Caption ＝ \，其中Label1,Caption, \分别代表( )。（2分） A、对象，方法和值 B、对象，属性和值 C、对象，属性和方法 D、方法，对象和值 4、假如列表框（Listl）有六个数据项，那么把数据项“hello”添加到列表框的最后，应使用的语句为（2分） A、Listl.AddItem 5, “hello” B、Listl.AddItem “hello”,Listl.ListCount-1 C、Listl.AddItem “hello”,5 D、Listl.AddItem “hello”,Listl.ListCount 5、在用菜单编辑器设计菜单时，必须输入的项目是（2分） A、标题 B、名称 C、快捷键 D、索引 6、下列程序运行的结果是:( )。Private Sub Form＿Load() : Dim a() : a ＝ Array(1.2, 2.3, 3.4, 4.5, 5.6, 6.7) : Print a(a(3)) :End Sub （2分） A、4 B、4.5 C、5.6 D、6.7 7、用Append方式打开文件时，文件指针被定位在（2分） A、文件末尾 B、文件开始 C、文件末尾减1 D、文件开始加1 8、下列程序运行的结果是( )。 Private Sub Form＿Load() : Dim p(5) : For k ＝ 1 To 5 : p(k) ＝ k * k : Next k : Print p(p(2) * p(4) - p(3) * 7 + p(2)) :End Sub（2分） A、4 B、9 C、16 D、25 9、使用pinrt方法，将计算结果显示在窗体（ Form1）上，必须将窗体＿＿＿＿＿＿属性设置成True。（2分） A、Enabled B、MaxButton C、AutoRedraw D、Moveable 10、a为数组名，合法的数组元素是＿＿＿＿＿＿。（2分） A、a B、a(a) C、a(a(2)) D、a[2] 11、根据文件的存取方式和结构，下列正确的分类为（2分） A、文本文件和随机文件 B、顺序文件和二进制文件 C、顺序文件和随机文件 D、ASCII文件和二进制文件 12、设有变量声明：Dim TestDate As Date，为变量TestDate正确赋值的表达方式是（2分） A、TestDate ＝ #1/1/2002# B、TestDate ＝ #\ C、TestDate ＝ Date(\ D、TestDate ＝ Format(\ 13、如果在定义一个过程时，没有使用任何限制的关键字，则定义的过程属于（2分） A、随机的 B、Private C、Static D、Public 14、在通用对话框中，用来指定显示文件类型的属性是（2分） A、DialogTitle B、FileTile C、FilterIndex D、Filter 15、要使菜单命令能通过Alt+M键打开，正确的做法为（2分） A、在菜单编辑器的“名称”栏中的“M”字符前加上“&”字符 B、在菜单编辑器的“名称”栏中的“M”字符后加上“&”字符 D、在菜单编辑器的“标题”栏中的“M”字符后加上“&”C、在菜单编辑器的“标题”栏中的“M”字符前加上“&”字符 字符 16、下列关于Sub过程的正确说法为（2分） A、必须有一个End Sub语句 B、必须有一个Private关键字 C、必须有一个Exit Sub语句 D、可以使用GoTo语句退出Sub过程 17、将数据项“hello”添加到列表框（Listl）中成为第一项应使用的语句为（2分） A、Listl.AddItem “hello”,0 B、Listl.AddItem “hello”,1 C、Listl.AddItem0,” hello”,0 D、Listl.AddItem 1,” hello” 18、下列符号常量的声明中，不合法的是（2分） A、Const a As Single ＝ 1.1 B、Const a As Integer ＝ \ C、Const a As Double ＝ Sin(1) D、Const a ＝ \ 19、正确表示数组a的元素的是（2分） A、a[8] B、a＜8＞ C、a8 D、a（8） 20、用Open语句打开一个随机文件时，若省略“Len＝记录长度”，则记录的长度为（2分） A、64 B、128 C、256 D、1024 21、下列关于局部变量的错误叙述为（2分） A、在过程内不加声明直接使用的变量 B、在过程内用Dim声明的变量 C、只能在定义的过程内使用 D、过程调用结束，内存单元保留 22、文本文件的正确叙述是（2分） A、每一条记录可长可短 B、记录之间以“Tab”字符间隔 C、文本文件最适合使用二进制模式 D、文本文件可以按行、列随机访问 23、当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件，这三个事件发生的顺序是（2分） A、KeyPress、KeyDown、KeyUp B、KeyDown、KeyUp、KeyPress C、KeyDown、KeyPress、KeyUp D、没有规律 24、下面用于定义窗体或标准模块数组的是（2分） A、Dim B、Redim C、Public D、Static 25、若定义了Sub Maxxy（x％，y％），下列正确的调用为（2分） A、Maxxy 5，8 B、Maxxy “58”，20 C、Call Maxxy 5，8 D、Call Maxxy（5，8，20） 26、窗体设计器是用于设计()。（2分） A、应用程序的界面 B、对象的属性 C、应用程序的代码 D、窗体的代码 27、为了删除ComboBox控件中的项目，需要使用的方法为（2分） A、Add B、Remove C、AddItem D、RemoveItem 28、已知下列程序段：a ＝ 3: b ＝ 4: Print b ＞ a，输出的结果是 。（2分） A、True B、False C、4＞3 D、显示出错信息 29、在命令行中：Command1.Caption＝”Command1”，Command1，”Command1”分别代表的是＿＿＿＿＿＿ （2分） A、方法，标题 B、控件名称，属性值 C、文件名，标题 D、对象，控件名称 30、有一命令控件在程序运行后，在窗体中出现的是灰色，是因为该控件的＿＿＿＿＿＿属性设置为False（2分） A、Name B、Visible C、Enabled D、Caption 31、实现参数的传值方式的关键字为（2分） A、ByRef B、ByVal C、ByData D、ByNum 32、要使窗体上所有控件具有相同的字体，应该对＿＿＿＿＿＿控件的Font属性进行设置。（2分） A、窗体 B、所有控件 C、Visible D、Font Name 33、Visual Basic的编程机制是( )。（2分） A、面向过程 B、面向对象 C、事件驱动 D、可视化 34、在程序中使用过程的主要目的是（2分） A、提高程序的可读性 B、提高程序的运行速度 C、便于程序移植 D、模块化编程 35、刚启动Visual Basic时，不在工具箱中出现的控件为（2分） A、文本框 B、列表框 C、通用对话框 D、标签 二、简答题（2道小题，共10分） 1、在代码窗口输入代码时，输入控件的名称及圆点后，出现下拉列表后，如何输入方法或属性？ （5分）

答：如果是第一个，直接按TAB键，如果不是第一个按上下键进行选择。 2、Choose()函数中，如果整数表达式的值小于1或大于列出的选项数目时，Choose()函数的返回值是什么？ （5分） 答：Choose()函数的返回值为Null。 三、编程题（2道小题，共20分） 1、已知一个学生信息的文本文件为student.dat，学生信息包括： 姓名（字符型） 专业（字符型） 年龄（整型） 分数（整型） 编写程序，查找姓名为“王军”的学生并输出其记录。 （10分） 请将你解答本题所写的源程序粘贴到下面 public type student sName as stringzhuanye as stringage as integerscore as integerend type 2、编写程序，用普通迭代法求方程f(x)＝x+lnx-1.7＝0的近似实根r， 迭代初值为1.5，精确到0.0001。〔提示：必须把方程f(x)＝0化成 其等价形式x＝g(x)〕。（允许使用其他迭代法） （10分） 请将你解答本题所写的源程序粘贴到下面 Private Sub Command1＿Click()Dim x As Singlex ＝ 1.5While Abs(x + Log(x) - 1.7) ＞ 0.0001 x ＝ x - (x + Log(x) - 1.7) / (1 + 1 / x)WendPrint xEnd Sub S831A6106158E4

强烈建议您使用IE 6.0以上，屏幕分辨率1024×768以上，真彩，小字体浏览

本文来源：https://www.bwwdw.com/article/ud36.html