VB等级考试题集2.doc

笔试一、选择题1、下面不属于软件设计原则的是_。A、抽象B、模块化C、自底向上D、信息隐蔽2、在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是_。A、概要设计B、详细设计C、可行性分析D、需求分析4、结构化程序设计主要强调的是_。A、程序的规模B、程序的易读性C、程序的执行效率D、程序的可移植性5、下列关于栈的叙述中正确的是_。A、在栈中只能插入数据B、在栈中只能删除数据C、栈是先进先出的线性表D、栈是先进后出的线性表6、在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是_。A、可行性分析B、需求分析C、详细设计D、程序编码7、下列说法中，不属于数据模型所描述的内容的是_。A、数据结构B、数据操作C、数据查询D、数据约束8、以下数据结构中不属于线性数据结构的是_。A、队列B、线性表C、二叉树D、栈9、下列有关数据库的描述，正确的是_。A、数据库是一个DBF文件B、数据库是一个关系C、数据库是一个结构化的数据集合D、数据库是一组文件(数据库（Database，简称DB）是数据的集合，它具有统一的结构形式并存放于统一的存储介质内，是多种应用数据的集成，并可被各个应用程序所共享。数据库中的数据具有集成、共享之特点。)10、对长度为N的线性表进行顺序查找，在最坏情况下所需要的比较次数为_。A、N+1B、NC、(N+1)/2D、N/211、设执行以下程序段时依次输入1、3、5，执行结果为_。 Dim a(4) As Integer, b(4) As Integer For K = 0 To 2 a(K + 1) = Val(InputBox(请输入数据) b(3 - K) = a(K + 1) Next K Print b(K)A、 1B、 3C、 5D、 012、能够获得一个文本框中被选取文本的内容的属性是_。A、TextB、SelLengthC、SelTextD、SelStart13、要使目录列表框（名称为Dir1）中的目录随着驱动器列表框（名称为Drive1）中所选择的当前驱动器的不同而同时发生变化，则应_。A、在Dir1中的Change事件中，书写语句 Dir1.Drive=Drive1.DriveB、在Dir1中的Change事件中，书写语句 Dir1.Path=Drive1.DriveC、在Drive1中的Change事件中，书写语句 Dir1.Path=Drive1.DriveD、在Drive1中的Change事件中，书写语句 Dir1.Drive=Drive1.Drive14、下列程序段的执行结果为_。X=2.4:Z=3:K=5Print A(;X+Z*K;)A、A( 17 )B、A( 17.4 )C、A( 18 )D、A(2.4+3*5)15、若有一菜单项（名为MenuItem），为了在运行时使该菜单项失效（变灰），应使用的语句是_。A、MenuItem.Enabled = TrueB、MenuItem.Visible = FalseC、MenuItem.Checked = TrueD、MenuItem.Enabled = False16、函数Len(Str(Val(123.4)的值为_。A、11B、5C、6D、817、Rnd函数不可能产生_值。A、0B、1C、0.1234D、0.0000518、为使计时器控件每隔5秒钟产生一个计时器事件（Timer事件），则应将其Interval属性值设置为_。A、5B、500C、300D、500019、能够改变窗体边框线类型的属性是_。A、FontStyleB、BorderStyleC、BackStyleD、Border20、Visual Basic逻辑运算符Xor、Or、Eqv、And中，级别最高的运算符是_。A、XorB、OrC、EqvD、And(在Visual Basic中逻辑运算符的优先级为：NotAndOrXorEqvImp。)21、以下说法正确的是_。A、任何时候都可以使用工具菜单下的菜单编辑器命令打开菜单编辑器B、只有当某个窗体为当前活动窗体时，才能打开菜单编辑器C、只有当代码窗口为当前活动窗口时，才能打开菜单编辑器D、任何时候都可以使用标准工具栏的菜单编辑器按钮打开菜单编辑器22、在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是_。A、Picture1.Picture=mypic.jpgB、Picture1.Image=mypic.jpgC、Picture1.Picture=LoadPicture(mypic.jpg)D、LoadPicture(mypic.jpg)23、下列叙述中不正确的是_。A、驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框B、驱动器列表框的Drive属性只能在运行时被设置C、从驱动器列表框中选择驱动器能自动地变更系统当前的工作驱动器D、要改变系统当前的工作驱动器需要使用ChDrive语句24、要使一个标签透明且不具有边框，则应_。A、将其BackStyle属性设置为0，BorderStyle属性设置为0B、将其BackStyle属性设置为0，BorderStyle属性设置为1C、将其BackStyle属性设置为1，BorderStyle属性设置为0D、将其BackStyle属性设置为1，BorderStyle属性设置为125、下列程序段的执行结果为_。 A = abcd B = bcde E = Right(A, 3) F = Mid(B, 2, 3) If E F Then Print E + F Else Print F + EA、cdebcdB、cddC、cdcdD、bcdcde26、下列程序段的执行结果为_。 x = 1 Y = 1 For I = 1 To 3 F = x + Y x = Y Y = F Print F; Next IA、 2 3 6B、 2 2 2C、 2 3 4D、 2 3 527、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的_属性。A、BackColorB、BorderStyleC、ForeColorD、BackStyle28、下列程序段的执行结果为_。 X = 2 Y = 1 If X * Y 0A、TrueB、FalseC、-1D、129、表达式Int(-17.8)+Fix(-17.8)+Int(17.8)+Fix(17.8)的值是_。A、1B、0C、-1D、-230、Sub过程与Function过程最根本的区别是_。A、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以B、Function过程可以有参数，Sub过程不可以C、两种过程参数的传递方式不同D、Sub过程的过程名不能返回值，而Function过程能通过过程名返回值31、单击窗体时，下列程序代码的执行结果为_。Private Sub Form_Click() Test 2End SubPrivate Sub Test(x As Integer) x = x * 2 + 1 If x 6 Then Call Test(x) End If x = x * 2 + 1 Print x;End SubA、 23 47B、 5 11C、 10 22D、 23 2332、下列程序段的执行结果为_。 Dim A(10), B(5) For i = 1 To 10 A(i) = i Next i For j = 1 To 5 B(j) = j * 20 Next j A(5) = B(2) Print A(5)=; A(5)A、A(5)= 5B、A(5)= 10C、A(5)= 20D、A(5)= 4033、列表框中的列表项的数目可以通过以下哪个属性的值获得_。A、CountB、ListCountC、ListIndexD、Index34、下列程序段的执行结果为_。 S = 0: T = 0: U = 0 For X = 1 To 3 For Y = 1 To X For Z = Y To 3 S = S + 1 Next Z T = T + 1 Next Y U = U + 1 Next X Print S; T; UA、 3 6 14B、 14 6 3C、 14 3 6D、 16 4 335、文件列表框中用于设置或返回是否显示只读文件的属性是_。A、SystemB、HiddenC、ReadOnlyD、FileName二、填空题：1、若按功能划分，软件测试的方法通常分为白盒测试方法和_测试方法。黑盒2、数据库系统的三级模式分别为_模式、内部级模式与外部级模式。概念3、在面向对象方法中，信息隐蔽是通过对象的_性来实现的。 封装5、关系模型的数据操纵即是建立在关系上的数据操纵，一般有_、增加、删除和修改四种操作。 查询6、运行如下程序段： x = 1 y = 1 z = 1 For j = 1 To 3 For k = 1 To 3 If j = 1 Then x = x + y + z ElseIf j = 2 Then x = 2 * x + 2 * y + 2 * z Else x = 3 * x + 3 * y + 3 * z End If Next k Next jx的值应是_。 23467、以下程序用来输出20个在开区间（10,87）中的随机整数R，每行输出4个整数。Private Sub Command1_Click() For i = 1 To 20 R=_ Print r; If _ Then Print Next iEnd Sub Int(76*Rnd+11)8、单击窗体时，程序运行的结果是：_Private Sub Form_Click() multi 20, 3End SubPublic Sub multi(k As Integer, s As Integer) If k 50 Then k = k * s Call multi(k, s) End If k = k + k * s Print k;End Sub 240 960 9、以下程序用于在带垂直滚动条的文本框Text1中输出3到100之间的全部素数。Private Sub Command1_Click() Text1.Text = For N = 3 To 100 k = Int(Sqr(N) i = 2 Flag = 0 Do While I 0 y = x + 1 Case Is = 0 y = x + 2 Case Else y = x + 3 End Select Print x; y运行时，从键盘输入-5，输出的结果是_。 -5 -2注：1、2、3、5、关系模型的数据操纵即是建立在关系上的数据操纵，一般有查询、增加、删除和修改四种操作。 数据查询：用户可以查询关系数据库中的数据，它包括一个关系内的查询以及多个关系间的查询。 数据删除的基本单位是一个关系内的元组，它的功能是将指定关系内的指定元组删除。 数据插入仅对一个关系而言，在指定关系中插入一个或多个元组。 数据修改是在一个关系中修改指定的元组和属性。7、Rnd()函数Rnd(number)函数返回小于1但大于或等于0的值。Rnd()函数的作用是从随机数生成器所生成的随机数序列中返回一个随机数。如果在每次调用Rnd()函数之前先使用无参数的 Randomize语句初始化随机数生成器，则随机数生成器将会生成新的随机数序列，Rnd()函数所返回的随机数将是与上一次调用Rnd()函数所得到的随机数不相同的值。如果在每次调用Rnd()函数之前不使用Randomize语句来初始化随机数生成器，则每次调用Rnd()函数所返回的随机数都是第一次调用Rnd()函数时随机数生成器所生成的随机数序列中的随机数。这时，number参数的不同取值，将使Rnd()函数所返回的随机数发生变化:若number0则每次得到的随机数都是随机数序列中的下一个随机数。若number=0则每次得到的随机数都是随机数序列中最近生成的随机数。 省略number参数所得到的随机数将得随机数序列中的下一个随机数。要生成某个范围内的随机整数，可使用以下公式：Int(随机整数上限-随机整数下限+1)*Rnd+随机整数下限)解题思路：题目要求生成20个在开区间（10，87）上的随机整数R,则11=R=86，所以R=Int(86-11+1)*Rnd+11)=int(76*Rnd+11)或者R=Int(Rnd*(86-11+1)+11)=int(Rnd*76+11)题目要求每行打印4个随机整数，即I为4的倍数的时候，要换行输出，所以第二空应填：I Mod 4 = 0。10、文本框控件的Text属性、Mid函数Text属性用来设置或返回文本框编辑区中的文本格式为：文本框控件名.Text = 字符串由于Text属性是文本框控件的缺省属性，因此还可以写成：文本框控件名 = 字符串Mid(字符串，p,n)函数用来在“字符串”中