新版VB作业答案.doc

大学计算机基础及VB程序设计作业答案教师：阳韬盐城工学院信息学院第一次作业一、选择题5.算法的有穷行是指（A）。 A.算法程序的运行时间是有限的 B算法程序所处理的数据量是有限的C.算法程序的长度是有限的 D.算法只能被有限的用户使用 6.算法的时间复杂度是指（C）。A.算法的执行时间 B.算法所处理的数据量C.算法执行过程中所需要的基本运算次数 D.算法程序中的语句或指令条数 7.算法的空间复杂度是指（B）。A.算法程序中的语句或指令条数 B.算法在执行过程中所需要的计算机存储空间 C.算法所处理的数据量 D.算法在执行过程中所需要的临时工作单元数 16.以下数据结构中不属于线性数据结构的是（C）。A.队列 B.线性表C.二叉树 D.带链的栈 49.一颗二叉树中共有70个叶子结点与80个度为1的结点，则该二叉树中的结点总数应该为（A）。A.219 B.221 C.229 D.23 50.在一棵二叉树上第7层的结点数最多是（C）。A.16 B.32 C.64 D.128 64.对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为（B）。A.n+1 B.n C.(n+1)/2 D.n/2 二、填空题1.算法的基本特征是可行行、确定性、（有穷性）和（输入/输出性）。 2.算法的工作量大小和实现算法所需的存储单元多少分别称为算法的（时间复杂度）和空间（复杂度）。 16.一个栈的初始状态为空。首先将元素5、4、3、2、1依次入栈，然后退栈一次，再将元素A、B、C、D依次入栈，之后将所有元素全部退栈，则所有元素退栈（包括中间退栈的元素）的顺序为(1DCBA2345)。 17.一个队列的初始状态为空。现将元素A、B、C、D、E、F、5、4、3、2、1依次入队，然后在依次退队，则元素退队的顺序为（ABCDEF54321）。一、选择题1.结构化程序设计主要情调的是（B）。A.程序的规模 B.程序的易读性 C.程序的执行效率 D.程序的可移植性 4.下列选项中不属于结构化程序设计原则的是（A）。A.可封装 B.自顶向下C.模块化 D.逐步求精 5.在面向对象方法中，实现信息隐蔽是依靠对象的（C）。A.继承 B.多态C.封装 D.分类 二、填空题1.源程序文档化要求程序应加注释。注释一般分为序言性注释和（功能性注释）。 2.结构化程序设计的三种基本结构为顺序结构、选择结构和（循环结构）。 10.面向对象的模型中，最基本的概念是对象和（类）。第二次作业1、 选择题3、 软件工程的出现是由于（ C）。 A、程序设计方法学的影响 B、软件产业化的需要 C、软件危机的出现 D、计算机的发展8、 下面不属于软件工程的三个要素的是（B）。 A、工具 B、环境 C、方法 D、过程34、 软件设计中，有利于提高模块独立性的一个准则是（C）。 A、高内聚高耦合 B、低内聚高耦合 C、高内聚低耦合 D、低内聚低耦合49、 软件调试的目的是（B）。 A、发现错误 B、改正错误 C、改善软件的性能 D、编程调试1、 在数据管理技术发展的三个阶段中，数据共享最好的是（C）。 A、人工管理阶段 B、文件系统阶段 C、数据库系统阶段 D、三个阶段相同14、 数据库系统的核心是（B）。 A、数据库 B、数据库管理系统 C、软件工具 D、数据模型23、 用树形结构来表示实体之间联系的模型成为（B）。 A、关系模型 B、层次模型 C、网状模型 D、数据模型26、 最常用的一种基本数据模型是关系数据模型，它的表示应采用（C）。 A、图 B、网络 C、二维表 D、树33、 关系模型允许定义三类数据约束，下列不属于数据约束的是（D）。 A、参照完整性约束 B、实体完整性约束 C、用户自定义的完整性约束 D、域完整性约束40、 有两个关系R和S如下： R S ABa3b0c2ABCa32b01c21 由关系R通过原酸得到关系S，则所使用的运算为（B）。 A、选择 B、投影 C、插入 D、连接二.填空题1.软件是程序,数据和文档的集合。7.软件的需求分析阶段的工作，可以概括为四个方面需求获取.需求分析.编写需求规格说明书和需求评审。14.通常将软件产品从提出.实现.使用维护到停止使用退役的过程称为软件生命周期.2.数据库系统阶段的数据具有较高独立性,数据独立性包括物理独立性和逻辑独立性两个含义.12.在E-R图中,矩形表示实体集.17.人员基本信息一般包括:身份证号,姓名,性别,年龄等.其中可以作为主关键字的是身份证号.20.在数据库技术中,实体集之间的联系可以是一对一,一对多(或多对一)或多对多的,那么“学生”和“可选课程”的联系为 多对多 .第三次作业1.VB是用于开发_环境下应用程序的工具。 （B）A. DOS B. Windows C. DOS和Windows D. UNIX2.VB6.0是_位操作系统下的应用程序的开发工具。 （A）A. 32 B. 16 C. 32或16 D. 643.一个对象可执行的动作与可被一个对象所识别的动作分别被称为_ （B）A.事件、方法 B.方法、事件 C.属性、方法 D.过程、事件4.下列有关对象的叙述正确的是_ （D)A.对象由属性、事件和方法构成 B.所有种类的对象都具有完全相同的属性C.对象的事件一定就是由VB预先设置好的，能够被对象识别的人工干预的工作D.对象的方法是对象响应某个事件所执行的一段程序代码5. Windows 程序的运行模式被称为 事件或消息驱动方式 6. 在正常打开的VB集成开发环境下，除工具栏、菜单条之外，还包括有工具箱、工程资源管理器、窗口、属性窗口，窗体布局窗口、代码编辑器窗口。第四次作业一、选择题3.Print 方法可在 上输出数据。窗体,文本框，图片框，标签，列表框，“立即”窗口。 (A)A. B. C. D4.在一个多窗体程序中，可以仅将窗体Form2从内存中卸载的语句是_ (B)A.Form2.Unload Bunload Form2C.Form2.End D.Form2.Hide5.下列对于某对象的SetFocus与GotFocus描述正确的是_(D)A.SetFocus是事件，GotFocus是方法 B.SetFocus和GotFocus都是事件。C.SetFocus和GotFocus都是方法D.SetFocus是方法，GotFocus是事件8.在列表框List1中有若干列表项，可以删除选定列表项的语句是_(D)A.List1.text=” B.List1.List(List1.ListIndex)=”C.List1.Clear D.List1.RemoveItem List1.ListIndex10.要将焦点设置在某个控件上，可以采取_(D)A.使用鼠标直接点击该控件B使用”Tab”键将焦点移到该控件C.程序中调用该控件的SetFocus方法D.以上都可以13.下列关于菜单的说法错误的是_(B)A.每一个菜单项就是一个对象，并且可设置自己的属性和事件B.菜单项不可以响应DbClick事件C.VB6.0允许创建超过四级的子菜单D.程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的Enabled属性为False二填空题2.以下窗体名中属于非法窗体名的是（）aform,3frm,f_1,frm5,f_1*.4.在桌面上存在多个窗口时，当一个窗口由非当前窗口转换为当前窗口时，会引发该窗体的(Activate)事件。当改该窗口大小时，会引发（Resize）事件。5.给列表框List 1添加列表项的方法是（AddItem），清除所有列表项的方法是（Clear）。、7.除窗体之外，可作为其他控件容器的还有（框架和图片框）控件。8.常用控件中具有Value属性的控件有（复选框、滚动条、选项按钮）。其中取值类型为逻辑型的是（选项按钮），取值类型为数值型的是（复选框）。第五次作业一选择题：1.下列叙述错误的是_。(D) A.以.frm为拓展名的文件是窗体模块文件 B.以.bas为拓展名的文件是标准模块文件 C.窗体模块文件包含该窗体以及其窗体上相关控件的属性信息 D.标准窗体文件可包含事件过程，通用过程等内容2. 数学表达式对应的VB表达式_。(C) A. B. C. D.5. 下列能够正确表示条件“”的VB逻辑表达式是_。(C) A. B.Or C.And D.6. 下列表达式中运算结果为True的是_。(B) A.”abcrd”=”ABCRD” B.Int(134.69)CInt(134.69) C. D.Mid(“Visual”,1,4)=Right(”Visual”,4)7. 若使逻辑表达式Xor结果为True，则在下列选项中x,y,z的取值应为_。(A) A.x=3,y=3,z=4 B.x=2,y=1,z=2 C.x=1,y=3,z=2 D.x=2,y=2,z=28. 下列语句不能正常执行的（正常执行是指系统不给出错误提示）是_(A)。 A.Print32765+3 B.Print5+7=14 C.Print D.Print”14”+3211. 表达式的值是_。(B) A. 2 B.5 C.6 D.10二. 填空题2. 事件过程由VB中的事件调用执行，通过过程由事件过程或其他通用过程调用执行。10. 数学式子duiy对应饿算术表达式是 （1/2）*(d/3)（2*x）13.根据图填空 z = InputBox(输入一个数： , 程序示例 , 1.5 )14. 写出显示如下信息框的MsgBox函数.X=MsgBox(Z的值 & Str(z) & 大于0 , 48 , 程序示例 )第六次作业一 选择题1 针对语句if i = 0 Then j =0，下列说法正确的是_(C)A i = 0 和 j =0 均为赋值语句B i = 0 和 j =0 均为关系表达式C i = 0为关系表达式，D j =0 均为赋值语句2 下列关于If分支结构语句的说法正确的是_(D)A 有if一定有与之配对的end ifB 有if一定有与之配对的 ElseifC 有 if一定有与之配对的ElseD 有end if 一定有与之配对的if5 在Slect Case X 结构中（X为Integer类型），如果判断条件为X=5，正确的语句应该是_(C)Case X=5 B Case is 5C Case 5 D Case=56在Slect Case X 结构中（X为Integer类型），能正确描述5X10的Case语句是_(D)A Case Is 5，Is=10 B Case 5 =X=10C Case 5 =X，X=10 D Case 5 to 10三 编程题1 编写程序，求下列多表达式函数的值。 答：程序代码如下：Private Sub Command1_Click() Dim x As Integer, y As Integer x = Val(Text1.Text) If x = 0 Then y = 2 - x ElseIf x = 2 Then y = x + 2 ElseIf x = 5 Then y = x * x Else y = 25 - x End If Text2.Text = CStr(y)End Sub6 编写程序，随机生成100个两位整数，并统计出其中小于等于40,大于40小于等于70及大于70的数据个数答：程序代码如下：Option ExplicitPrivate Sub Form_Click() Dim i As Integer, x As Integer Dim c1 As Integer, c2 As Integer, c3 As Integer For i = 1 To 100 x = Int(Rnd * 90) + 10 Print x; If i Mod 10 = 0 Then Print If x = 40 Then c1 = c1 + 1 ElseIf x = 70 Then c2 = c2 + 1 Else c3 = c3 + 1 End If Next i Print Print 40且70的数有：, c3End Sub7 编写程序，随机生成20个三位正整数，将其中的偶数与奇数分别输到两个列表框中。答：程序代码如下：Option ExplicitPrivate Sub Form_Click() Dim x As Integer, i As Integer Print 生成的20个数如下： For i = 1 To 20 x = Int(Rnd * 900) + 100 If x Mod 2 = 0 Then List1.AddItem x Else List2.AddItem x End If Next iEnd Sub第七次作业一、选择题1.下列有关数组的说法正确的是_(C)A.数组的维下界不可以是负数B.模块通用声明处有Option Base 1，则模块中数组定义语句Dim A（0to5）会与之起冲突C.模块通用声明处有Option Base 1，模块中Dim A（0to5），则A组数组第一维维下界为0D.模块通用声明处有Option Base 1，模块中Dim A（0to5），则A组数组第一维维下界仍为13.下列有关数组的说法错误的是_(D)A.定义固定大小数组时，维界定义中不可以包含变量B.可以使用常数表达式或已经定义过的符号常数说明数组的维界C.定长字符串类型的数组不可以作为过程的形式参数D.只能在标准模块中用Public语句定义一个全局数组5. 下列有关数组的说法错误的是_(C)A.用ReDim语句重新定义动态数组时，其下标的上下界可以使用赋了值的变量B. 用ReDim语句重新定义动态数组时，不能改变已经说明过的数组的数据类型C.使用ReDim语句一定可以改变动态数组的上下界D.定义数组时，数组维界值可以不是整数7.下列有关控件数组的说法错误的是_(B)A.控件数组由一组具有相同名称和相同类型的控件组成，不同类型的控件无法组成控件数组B.控件数组中的所有控件不得具有各自不同的属性设置值C.控件数组中的所有控件共享同一个事件过程D.控件数组中每个元素的下标由控件的Index属性指定三、编程题1.编写程序，随机生成15个100以内的正整数并显示在一个文本框中，再将所有首尾对称位置的两个数据对调后显示在另一个文本框中（例如，第1个数与第15个数对调，第2个数与第14个数对调，第3个数与第13个数对调）。答：界面如图：程序代码如下：Option Base 1Option ExplicitDim a(15) As IntegerPrivate Sub Command1_Click() Dim i As Integer For i = 1 To 15 a(i) = Int(Rnd * 100) + 1 Text1.Text = Text1 & Str(a(i) Next iEnd SubPrivate Sub Command2_Click() Dim i As Integer For i = 15 To 1 Step -1 Text2.Text = Text2.Text & Str(a(i) Next iEnd SubPrivate Sub Command3_Click() EndEnd Sub5.编写程序，参照如图6-27所示界面，求由一位随机整数构成的数组每一行与每一列之和。答：程序代码如下：Option Base 1Option ExplicitDim a() As Integer, n As Integer, m As IntegerPrivate Sub Command1_Click() Dim i As Integer, j As Integer n = InputBox(请输入数组的行数：) m = InputBox(请输入数组的列数：) ReDim a(n, m) For i = 1 To n For j = 1 To m a(i, j) = Int(Rnd * 9) + 1 Picture1.Print a(i, j); Next j Picture1.Print Next iEnd SubPrivate Sub Command2_Click() Dim i As Integer, j As Integer, sum As Integer For j = 1 To m sum = 0 For i = 1 To n sum = sum + a(i, j) Next i Text2 = Text2 & Str(sum) Next jEnd SubPrivate Sub Command3_Click() Dim i As Integer, j As Integer, sum As Integer For i = 1 To n sum = 0 For j = 1 To m sum = sum + a(i, j) Next j Text1 = Text1 & Str(sum) & Chr(13) & Chr(10) Next iEnd Sub7.编写程序，生成一个5行5列由一位随机整数组成的二维数组，并计算：（1）所有元素之和；（2）所有靠边元素之和；（3）两条对角线元素之和。答：界面如图：程序代码如下：Option Base 1Option ExplicitDim a(5, 5) As IntegerPrivate Sub Command1_Click() Dim i As Integer, j As Integer For i = 1 To 5 For j = 1 To 5 a(i, j) = Int(Rnd * 9) + 1 Picture1.Print a(i, j); Next j Picture1.Print Next iEnd SubPrivate Sub Command2_Click() Dim i As Integer, j As Integer Dim s1 As Integer, s2 As Integer, s3 As Integer For i = 1 To 5 For j = 1 To 5 s1 = s1 + a(i, j) If i = 1 Or i = 5 Or j = 1 Or j = 5 Then s2 = s2 + a(i, j) If i = j Or i + j = 6 Then s3 = s3 + a(i, j) Next j Next i Text1 = Str(s1) Text2 = Str(s2) Text3.Text = Str(s3)End SubPrivate Sub Command3_Click() Picture1.Cls Text1 = Text2 = Text3 = End SubPrivate Sub Command4_Click() EndEnd Sub第八次作业1、 选择题1. 下列有关事件过程的说法正确的是：_(D)A. 所有的事件过程都是sub子过程B. 所有的事件过程都没有参数C. 所有的事件都是由用户的操作直接引发的D. 事件过程不能使用Call语句调用执行2. 下列关于Function过程的说法错误的是：_(C)A. Function过程名可以有一个或多个返回值B. 在Function过程内部不得再定义Function过程C. Function过程中可以包含多个Exit Function语句D. 可以像调用Sub过程一样调用Function过程3. 下列有关过程的说法错误的是：_(D)A. 不论Function过程中是否给函数名赋过值，都会返回一个值B. 不能给Sub过程名赋值C. Function过程与Sub过程都可以是无参过程D. 过程名可以和主调过程的局部变量同名4. 下列有关过程中形式参数的描述错误的是：_(B)A. 函数过程可以没有形式参数B. 事件过程一定没有形式参数C. 形参数组只能按地址与实参数组结合D. 窗体与控件也可以作为过程的参数2、 编程题1. 编写一个摄氏与华氏温度转换的通用过程。摄氏（C）与华氏（C）温度转换的公式如下：F=C*9/5+32.要求：在一个文本框中输入摄氏温度，在另一个文本框中显示对应的华氏温度答：界面如图：程序代码如下：Option ExplicitPrivate Sub Command1_Click() Dim C As Single, F As Single C = Val(Text1.Text) Call CtoF(C, F) Text2.Text = CStr(F)End SubPublic Sub CtoF(C As Single, F As Single) F = C * 9 / 5 + 32End SubPrivate Sub Command2_Click() Text1 = Text2 = Text1.SetFocusEnd Sub2. 随机生成30个1099之间的正整数，将其中的素数和合数挑选出来，并分别显示在两个列表框中。编写一个判断一个数是否是素数的自定义函数。答：程序代码如下Option ExplicitOption Base 1Private Sub Command1_Click()Dim i As Integer, j As IntegerDim a(30) As IntegerFor i = 1 To 30 a(i) = Int(Rnd * 90 + 10) For j = 2 To a(i) -