[计算机类试卷]VB笔试模拟试卷258及答案与解析.doc

1、VB笔试模拟试卷 258及答案与解析 1 如果在程序中要将 c定义为静态变量，且为整型数，则应使用的语句是 （ A） Redim a As Integer （ B） Static a As Integer （ C） Public a As Integer （ D） Dim a As Integer 2 算法的空间复杂度是指 （ A）算法程序的长度 （ B）算法程序中的指令条数 （ C）算法程序所占的存储空问 （ D）算法执行过程中所需要的存储空间 3 要使标签能够显示所需要的文本，则在程序中应设置 （ ）属性的值。 （ A） Caption （ B） Text （ C） Name （ D） A

2、utoSize 4 下列数据结构中，属于非线性的是 ( )。 （ A）线性表 （ B）队列 （ C）树 （ D）栈 5 下列描述错误的是 ( )。 （ A）继承分为多重继承和单继承 （ B）对象间靠传递消息实现通信 （ C）在外面看不到对象的内部特征是基于对象的 “模块独立性好 ”这个特征 （ D）类是具有共同属性、共同方法的对象的集合 6 关于结构化程序设计原则和方法的描述错误的是 ( )。 （ A）选用的结构只准许有一个入口和一个出口 （ B）复杂结构应该用嵌套的基本控制结构进行组合嵌套来实现 （ C）不允许使用 GOTO语句 （ D）语言中所没有的控制结构，应该采用前后一致的方法来模拟

3、7 对建立良好的程序设计风格，下面描述正确的是 _。 （ A）程序应简单、清晰、可读性好 （ B）符号名的命名要符合语法 （ C）充分考虑程序的执行效率 （ D）程序的注释可有可无 8 相对于数据库系统，文件系统的主要缺陷有数据关联差、数据不一致性和_。 （ A）可重用性差 （ B） 安全性差 （ C）非持久性 （ D）冗余性 9 循环链表的主要优点是 （ A）不再需要头指针了 （ B）从表中任一结点出发都能访问到整个链表 （ C）在进行插入、删除运算时，能更好的保证链表不断开 （ D）已知某个结点的位置后，能够容易的找到它的直接前件 10 数据库系统的核心是 （ A）数据库 （ B）数据库管

4、理系统 （ C）数据模型 （ D）软件工具 11 数值型数据包括 ( )两种。 （ A）整型和长整型 （ B）整型和浮点型 （ C）单精度型和双精度型 （ D）整型实型和货币型 12 下列 ( )标识符不能作为 VisualBasic的变量名。 （ A） ABCabe （ B） b1234 （ C） 28wed （ D） crud 13 如果一个变量未经定义就直接使用，则该变量的类型为（ ）。 （ A） Integer （ B） Byte （ C） Boolean （ D） Variant 14 实体是信息世界中广泛使用的一个术语，它用于表示 ( )。 （ A）有生命的事物 （ B）无生命的事

5、物 （ C）实际存在的事物 （ D）一切事物 15 当一个工程含有多个窗体时，其中的启动窗体是 _。 （ A）启动 Visual Basic时建立的窗体 （ B）第一个添加的窗体 （ C）最后一个添加的窗体 （ D）在 “工程属性 ”对话框中指定的窗体 16 下列不能打开菜单编辑器的操作是 ( )。 （ A）按 Ctrl+E组合键 （ B）单击工具栏中的 “菜单编辑器 ”按钮 （ C）执行 “工具 ”菜单中的 “菜单编辑器 ”命令 （ D）按 Shift+Alt+M组合键 17 如果在 C盘当前文件夹下已经存在名称为 Sdat.dat的顺序文件，那么执 行语句Open “c:/Sdat.dat

6、“For Append As #1之后，将 ( )。 （ A）删除文件中的原有内容 （ B）保留文件中原有内容，并在文件尾添加新内容 （ C）保留文件中原有内容，并在文件头添加新内容 （ D）以上均不对 18 在窗体上画 4个文本框，并用这 4个文本框建立一个控件数组，名称为 Text1 (下标从 0开始，自左至右顺序增大 )，然后编者按写如下事件过程： Private Sub Command1_Cliek() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮， 4个文本框中显示的

7、内容分别为 ( )。 （ A） 0 1 2 3 （ B） 1 2 3 4 （ C） 0 1 3 2 （ D）出错信息 19 假定有一个菜单项，名为 Menultem，为了在运行时使该菜单项失效 (变灰 )，应使用的语句为 （ A） Menultem.Enabled=False （ B） Menultem.Enabled=True （ C） Menultem.Visible=True （ D） Menultem.Visible=False 20 如果要在菜单中添加一个分隔线，则应将其 Caption属性设置为 （ A） = （ B） * （ C） a End Sub 程序运行后，单击命令按钮则窗

8、体上显示的内容是 _。 （ A） 7 9 （ B） 34 0 （ C） 9 7 （ D）死循环 22 改变驱动器列表框的 Drive属性值将激活 _事件。 （ A） Change （ B） Scroll （ C） KeyDown （ D） KeyUp 23 下列程序段的执行结果为 _。 X=2 Y=1 If X*Y 1 Then Y=Y-1 Else Y=-1 Print Y-X 0 （ A） True （ B） False （ C） -1 （ D） 1 24 在下面向文件中写入数据的命令语句中，不正确的是 _。 （ A） Print#文件号，输出项列表 （ B） Print#文件号， Uns

9、ing；输出列表项 （ C） Write#文件号，输出列表 （ D） Write#文件号， Unsing；输出列表 25 在对象的 MouseDown和 MouseUp事件过程中，当 Button参 数的值为 1、 2、 4时，分别代表按下鼠标 _。 （ A）左键、中间键和右键 （ B）左键、右键和中间键 （ C）中间键、左键和右键 （ D）左键、右键和同时按下左右键 26 要使目录列表框 (名称为 Dir1)中的目录随着驱动器列表框 (名称为 Drive1)中所选择的当前驱动器的不同而同时发生变化，则应： （ A）在 Dir1中的 Change事件中，书写语句 Dir1.Drive Driv

10、e1.Drive （ B）在 Dir1中的 Change事件中，书写语句 Dir1.Path Drive1.Drive （ C）在 Drive1中的 Change事件中，书写语句 Dir1.Path Drive1.Drive （ D）在 Drive1中的 Change事件中，书写语句 Dir1.Drive=Drive1.Drive 27 对窗体编写如下事件过程： Private Sub Form_MouseDown(Button As Integer，Shift As Integer,X As Single， Y As Single) If Button = 2 Then Print“AAAA

11、A“ End If End Sub Private Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single) Print “BBBBB“ End Sub 程序运行后，如果单击鼠标右键，则输出结果为 _。 （ A） AAAAA BBBBB （ B） BBBBB （ C） AAAAA （ D） BBBBB AAAAA 28 在下列文件系统控件的事件中，当文件列表框的 Path属性改变时发生的事件是 _。 （ A） Click （ B） DblCliek （ C） PattermChange （ D

12、） PathChange 29 如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是 _ 。 （ A）如果工程中含有 SubMain过程，则程序一定首先执行该过程 （ B）不能把标准模块设置为启动模块 （ C）用 Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 （ D）任何时刻最多只有一个窗体是活动窗体 30 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim sum1 As Integer Dim a(1 To 20)， x

13、 For i = 1 To 10 a(i)=i Next i For Each x In a If x Mod 2 = 0 Then sum1=sum1+x Else sum = sum+x End If Next x Print sum； sum1 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） 25 30 （ B） 10 20 （ C） 20 30 （ D） 1 10 31 假定窗体的名称为 Form1，对该窗体编写如下代码： Private Sub Form_Load() Form1 Caption=“计算机 “ Me Caption=“等级 “ Caption

14、=“考试 “ End Sub 程序运行后，窗体的标题是 （ A）计算机 （ B）等级 （ C）考试 （ D） Form1 32 假定窗体上有一个文本框，名为 txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为 （ A） Txt1.MultiLine=True Txt1.ScrollBars=0 （ B） Txt1.MuhiLine=True Txt1.ScrollBars=2 （ C） Txt1.MuhiLine=False Txt1.ScrollBars=0 （ D） Txt1.MuhiLine=False Txt1.ScrollBars=3 33 在

15、窗体上画一个命令按钮，名称为 Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click( ) Dim city As Variant city=Array(“北京 ”， “上海 ”， “天津 ”， “重庆 ”) Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 （ A）空白 （ B）错误提示 （ C）北京 （ D）上海 34 以下关于菜单的叙述中，错误的是 _。 （ A）在程序运行过程中可以增加或减少菜单项 （ B）如 果把一个菜单的 Enabled属性设置为 False，则可删除

16、该菜单项 （ C）弹出式菜单在菜单编辑器中设计 （ D）利用控件数组可以实现菜单项的增加或减少 35 在 VisualBasic中按文件的编码方式不同，可将文件分为 （ A）顺序文件和随机文件 （ B）文本文件和数据文件 （ C） ASCH文件和二进制文件 （ D）数据文件和可执行文件 36 数据库保护分为：安全性控制、 _、并发性控制和数据的恢复。 37 软件的详细设计也称为模块设计，它要求设计人员为每一个程序模块确定：所使用的【 】、数据结构、接口细节和输入 /输出数据等。 38 在关系数据库中，把数据表示成二维表，每一个二维表称为【 】。 39 测试的目的是暴露错误，评价程序的可靠性；而

17、【 】的目的是发现错误的位置并改正错误。 40 对象还有操作，用于改变对象的状态，对象及其操作就是对象的【 】。 41 执行如下程序段后， int sum的值为 _。 Private SubCommand1_Click() sum=0 For i=1 To 18 Step 2 For j=2 To 6 If (i Modj) 0 Then sum=sum+j Next Next Print sum End Sub 42 函数 Str$(256.36)的值是 _。 43 以下程序的功能是：从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。 Private S

18、ub Form_click() Dim x, y As Single Dim z As Integer x=InputBox(“Enter a score“) Do while【 】 y=y+x z=z+1 x=InputBox(“Enter a score“) Loop If z=0 Then z=1 End If y=【 】 Print y End Sub 44 属性窗口分为 4个部分，这 4个部分分别是 _。 45 执行以下程序段，并输入 1.23，则程序的输出结果应是【 】。 N= Str(InputBox(“请输入一个实数： ”) p= InStr(N， “.“) Print Mid

19、(N， p) 46 在窗体上画一个命令按钮，然后编写如下事件过程： Option Base1 Private Sub Command1_Click() Dim a s=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print S End Sub 运行上面的程序，单击命令按钮，其输出结果是【 】。 47 以下程序用于计算 “1+1/3+1/5+1/(2n+1)” ，直至 “1/(2n+1)”小于 10-4。阅读下面程序，请在【 】和【 】处填上正确内容。 Private Sub Command1_Click() S

20、um = h: n = i do n=【 】 term =1/ n Sum = Sum + term if term 0.0001 then【 】 Loop Text1.Text = n Text2 *Text = Sum End Sub 48 窗体的属性可在属性窗口中设置，也可在程序中用【 】语句动态设置。 49 若有一个动态数组 a有两个元素 a(0)和 a(1)，现要令数组 a有三个元素 a(0)、a(1)和 a(2)，则应当使用【 】语句。 50 某人编写如下函数来判断 a是否为素数，若是，则函数返回 True；否则返回False Function prime(a As Integer

21、) As Boolean Dim k As Integer,ispfime As Boolean If a 2 Then isprime=False Else isprime=Tme k=2 Do While k a/2 And isprime If a Mod k=0 Then isprime=False Else k=k+1 End If Loop End If End Function 在测试时发现有一个非素数也被判断为素数，这个错判的数是【 】。 VB笔试模拟试卷 258答案与解析 1 【正确答案】 B 2 【正确答案】 D 3 【正确答案】 A 4 【正确答案】 C 【试题解析】 线

22、性结构是指数据元素只有一个直接前件元素和直接后件元素。线性表是线性结构，栈和队列是指对插入和删除操作有特殊要求的线性表，树是非线性结构。 5 【正确答案】 C 【试题解析】 对象的封装性是指从外面看只能看到对象的外部特性；而对象的内部，其处理能力的实行和内部状态对外是不可见的，是隐蔽的。 6 【正确答案】 C 【试题解析】 限制使用 GOTO语句是结构化程序设计的原则和方法之一，但不是绝对不允许使用 GOTO语句。其他 3项为结构化程序设计的原则。 7 【正确答案】 A 【试题解析】 要形成良好的程序设计风格，主要应注重和考虑下述一些因素：符号名的命名应具有一定的实际含义，以便于对程序功能的理

23、解：正确的注释能够帮助读者理解程序；程序编写应优先考虑 清晰性，除非对效率有特殊要求，程序编写要做到清晰第一，效率第二 8 【正确答案】 D 【试题解析】 文件系统管理的数据文件基本上是分散的、相互独立的，因此相对于数据库系统，以此为基础的数据处理存在 3个缺点：数据冗余大、数据的不一致性、程序与数据的相互依赖 (简称为数据依赖 )。 9 【正确答案】 B 【试题解析】 循环链表就是将单向链表中最后一个结点的指针指向头结点，使整个链表构成一个环形，这样的结构使得从表中的任一结点出发都能访问到整个链表。 10 【正确答案】 B 【试题解析 】 数据库管理系统是对数据库进行管理和对数据库进行操作的

24、管理系统， 它是建立在操作系统基础之上的，位于操作系统和用户之间的一层数据管理软件，负责 对数据库的数据进行统一的管理和控制，它是实现数据库和管理数据库的核心。 注意：数据库系统各方面之间的关系及相互作用。 11 【正确答案】 B 12 【正确答案】 C 【试题解析】 给变量命名时应遵循 4个原则： 名字只能由字母、数字和下划线组成； 第一个字符必须是英文字母，最后一个字符可以是类型说明符： 名字的有效字符为 255个； 不能使 用 Visual Basic中的保留字作为变量名。 13 【正确答案】 D 【试题解析】 VIStlal BaSjlc规定，未经定义的变量默认为 Variant类型。

25、 14 【正确答案】 C 【试题解析】 卖体是客观存在且可以相互区别的事物。实体可以是具体的对象，如一个人，也可以是抽象的事件，如拔河比赛等。因此，实体既可以是有生命的事物，也可以是无生命的事物，但它必须是客观存在且可以相互区别的。 15 【正确答案】 D 【试题解析】 在 “工程 -属性 ”对话框中可以指定工程的启动对象 (可以是窗体、Sub Main()。 16 【正确答案】 D 【试题解析】 可以通过以下 4种方式来打开菜单编辑器； 执行 “工具 ”菜单中的“菜单编辑器 ”命令； 使用 Ctrl+E组合键： 单击工具栏中的 “菜单编辑器 ”按钮； 在要建立菜单的窗体上单击鼠标右键，在弹出

26、的浮动菜单中选择 “菜单编辑器 ”命令。 17 【正确答案】 B 【试题解析】 本题考查考生对读取顺序文件的掌握情况 Append语句能向文件中继续追加新的内容。 18 【正确答案】 A 【试题解析】 数组控件的 Index属性默认从。开始，因此这 4个文本框的 Index值分别为 0、 1、 2、 3。题中通过 For Each循环，依次将每个文本框的 Index属性值赋给它自己的 Text属性，因此，运行程序后，文本框显示的内容为 0、 1、 2、3。 19 【正确答案】 A 【试题解析】 本题也是常考项目之一。 Enabled属性决定菜单项功能是否失效，如果选择 True则不失效，如果选

27、择 False，则失效，并用灰色表示。 Visible属性决定菜单项是否可见，选择 False为不可见，选择 True为可见。故本题答案选A。 20 【正确答 案】 D 【试题解析】 本题考查菜单编辑器。答案为 D，如果要在菜单中添加一个分隔线，则应将其 Caption属性设为 “-”。 C项的连接符一般在字母前加，显示菜单时在该字母下加上一条下划线，以表示访问键。 21 【正确答案】 C 【试题解析】 当第一次进入循环体后， s=1+8=9， a=8-1=7，由于 “7 =0”的条件为假，所以只执行了一次循环就退出循环体。最后打印出 9和 7。 22 【正确答案】 A 【试题解析】 驱动器列

28、表框控件的相关属性和事件 驱动器列表框的 Drive属性，用来设置 或返回程序运行时所选择的驱动器名。 当驱动器列表框的 Drive属性值发生变化时，会触发驱动器列表框的 Change事件。 当驱动器列表框的滚动框被重新定位或沿水平或垂直方向滚动时，会触发驱动器列表框的 Scroll事件。 在驱动器列表框获得焦点时，按下或松开键盘上的按键，会触发驱动器列表框的KeyDown或 KeyUp事件。 23 【正确答案】 B 【试题解析】 格式：表达式 1比较运算符表达式 2 关系表达式的比较规则是： 如果两个表达式都是数值，则进行数值比较。 如果两个表达式都是字符串，则进行字符串比 较。 如果一个表

29、达式是数值而另一个是字符串，则数值表达式小于字符串表达式。 该题中， X*Y=2*1=2，所以 X*Y 1为假，执行 Else分支， Y=-1此时 Y-X=-1-2=-3，所以 Y-X 0为假。 在 Visual Basic中，关系表达式的值用 True表示真；用 False表示假。 24 【正确答案】 D 【试题解析】 Print#语句的功能是把数据写入文件中，其语句格式如下： 格式 Print#文件号， Spc(n)ITab(n)表达式表 )； |， 和 Print#语句一样 ，用 Write#语句可以把数据写入顺序文件中，其格式如下： Write#文件号，表达式表 25 【正确答案】 B

30、 【试题解析】 Button参数指示用户按下或释放了哪个鼠标键。当 Button参数的值为 1时，表示用户按下或释放了鼠标的左键；当 Button参数的值为 2时，表示用户按卞或释放了鼠标的右键；当 Button参数的值为 4时，表示用户按下或释放了鼠标的中间键。 26 【正确答案】 C 【试题解析】 本题主要考查驱动器方面的知识。因为题中的变化是随着当前驱动器的不同而变化的，故应表 现在 Drivel中的 Change事件中，排除 A、 B项。目录列表框属性的一般设置格式为： 控件名称 Path路径字符串 通过以上知识可以排除 D项，只有 C项是正确的。 27 【正确答案】 A 【试题解析】

31、 窗体的的 MouseDown和 MouseUp中， button参数是具有相应于左按钮 (为 0)，右按钮 (为 1)，以及中间按钮 (为 2)的一个位字段。这些位的值分别等于 1， 2，和 4。其中仅有一位被设置，指示出引起该事件的那个按钮。本题中MouseDown事件会首先判断按下的是哪个鼠标键，如果是 右键则输出 AAAAA。然后在 MouseUp事件中输出 BBBBB。 28 【正确答案】 D 【试题解析】 Click事件：用鼠标单击时发生； DblClick事件：用鼠标双击时发生； PattermChange事件：当文件列表框的 Patterm属性改变时发生；PathChange：

32、当文件列表框的 Path属性改变时发生。所以应选择 D。 29 【正确答案】 A 【试题解析】 如果过程中含有 Sub Main过程，必须在工程属性中设置为 “启动对象 ”后才可以首先执行该过程；启动对象为 Form或者 Sub Main，不能是标准模块， Hide只是将载入内存中的窗体隐藏起来， Unload方法才能真正从内存中清除该窗体；任何时候只有一个窗体是活动窗体。 30 【正确答案】 A 【试题解析】 程序的前部分给数组 a赋初值，后部分利用 For Each-Next语句对其进行循环操作，将奇数和偶数之和分别赋值给变量 sum和 sum1。本题的难点就是要理解 For Each-N

33、ext语句。注意： For Each语句的控制变量必须为变体变量。窗体上显示的答案是 1 10之内奇数与偶数之和。 31 【正确答案】 C 【试题解析】 Form Load是程序运行后首先要执行的事件过程。在上面的事件过程中，有 3个赋值语句，这 3个语句都用来对对象赋值，即对对象的 Caption属性赋值，它们都可以设置窗体的标题。第 1个语句将窗体的标题设置为 “计算机 ”，执行第 2个语句后，窗体的标题变为 “等级 ”，而执行第 3个语句后，窗体的标题变为 “考试 ”。 32 【正确答案】 B 【试题解析】 Multine如果设置为 True，可以使用多行文本，即在文本框中输入或输出文本

34、时可换行，并在下一行接着输入或输出。 Scmllbars用来确定文本框 中没有滚动条，可以取 0、 1、 2、 3四个值，其含义分别为： 0表示没有滚动条； 1表示只有水平滚动条； 2表示只有垂直滚动条； 3表示同时具有水平滚动条和垂直滚动条。 33 【正确答案】 D 【试题解析】 由于有 “Option Base0”，所以以 Array函数赋值的数组下标下界为0。所以 city(1)指 Array赋给 city的第二个元素，即 “上海 ”，故本题选 D。 34 【正确答案】 B 【试题解析】 Enabled属性用来设置菜单项是否有效。如果把该属性设置为False，并不能把该菜单删除掉，只 能

35、把该菜单变为灰。所以选项 B是错误的。 35 【正确答案】 C 【试题解析】 文件的分类方法有多种。根据数据性质，可分为程序文件和数据文件；根据数据的存取方式和结构方式可分为顺序文件和随机文件；根据数据的编码方式，可分为 ASCII文件和二进制文件。选项 C是正确的答案；选项 B中文本文件是按数据编码划分的，数据 文件是按数据的性质划分的；选项 D中数据文件是按数据的性质划分的；选项 A是按 数据的存取方式划分的。 36 【正确答案】 完整性控制 【试题解析】 安全性控制是防止未经授权的用户有意或 无意存取数据库中的数据，以免数据被泄露、更改或破坏；完整性控制是保证数据库中数据及语义的正确性和

36、有效性，防止任何对数据造成错误的操作；并发控制是正确处理好多用户、多任务环境下的并发操作，防止错误发生；数据的恢复是当数据库被破坏或数据不正确时，使数据库能恢复到正确的状态。 37 【正确答案】 算法 38 【正确答案】 一个关系 【试题解析】 在关系数据库中，把数据表示成二维表，每一个二维表称为一个关系。 39 【正确答案】 调试 【试题解析】 软件测试的目标是在精心控制的环境下执行程序 ，以发现程序中的错误，给出程序可靠性的鉴定；调试也称排错，它是一个与测试有联系又有区别的概念。具体来说，测试的目的是暴露错误，评价程序的可靠性，而调试的目的是发现错误的位置，并改正错误。 40 【正确答案】

37、 行为 41 【正确答案】 161 【试题解析】 单循环次数 r=int(终值 -初值 +步长 ) /步长 ) ，嵌套循环次数是各层循环次数的乘积。该段程序的循环次数为 95=45(次 )，当 i不能被 j整除时， j的值相加。该段程序中只有以下条件不成立，即 3/3、 5/5、 9/3、 15/3、 15/5，所 以计算结果为 9(2+3+4+5+6)-(3+5+3+3+5)=161。 42 【正确答案】 256.36 【试题解析】 Str$() 函数的格式是： Str$(数值表达式 )，作用是把 “数值表达式 ”的值转换为一个字符串，表达式的值不受转换过程的影响。 43 【正确答案】 x

38、=0,y/z 【试题解析】 根据表达式的值有条件地执行一组语句。 语法 If condition ThenstatementsElse elsestatements 或者，可以使用块形式的语法： If condition Then statements ElseIf condition-n Then elseifsmtements. Else elsestatements End If 当条件为 True时，或直到条件变为 True时，重复执行一个语句块中的命令。 语法 DoWhile | Untilcondition statements Exit Do statements Loop 或者

39、可以使用下面这种语法： Do statements Exit Do statements LoopWhile | Untilcondition 本题的循环首先判断输入是否大于 0，如果是则处理这个输入，否则结束循环。循环体内的第二个判断语句判断的是当前输入是否比当前的最小值小，如果是则改写当前最小值为输入值，否则结束判断语句。 44 【正确答案】 对象框、属性显示方式、属性列表和属性解释 【试题解析】 对象属性在设计阶段可以通过属性窗口来设置。属性窗口分为 4个部分，即对象框、属性显示方式、属性列表和属性解释。 45 【正确答案】 23 【试题解析】 InStr函数、 Mid函数 InStr(

40、首字符位置 字符串 1，字符串 2， n)用来在 “字符串 1”中查找 “字符串 2”，如果找到，则返回 “字符串 2”的第一个字符在 “字符串 1”中的位置。 如果带有参数 “首字符位置 ”，则从该位置开始查找，否则从 “字符串 1”的起始位置查找。可选参数 “n”用来指定字符串比较方式，可以取 0、 1或 2。如为 0，则进行在比较时区分大小写；如为 1，则在比较时忽略大小写；如为 2，则基于数据库中包含的信息进行比较。 Mid(字符串， p， n)函数用来在 “字符串 ”中从第 p个字符开始，向后截取 n个字符。 如果省略参数 n，则从第 p个字符开始，向后截取到字符串的末尾。 跟踪程序

41、： n=“1.23“ p=InStr(n， “.“)=InStr(“1.23“， “.“) p=2 所以， Mid(“1.23“， 2)所截取的字符是： “.23”。 最终的输出结果是： .23。 46 【正确答案】 1234 【试题解析】 跟踪程序： 由 a=Array(1,2,3,4)可知： a(i)=1 a(2)=2 a(3)=3 a(4)=4 执行循环体： s=s+a(i)*j=a(4)*l1=4,j=j*10=10 s=s+a(i)*j=4+a(3)*10=34,j=j*10=100 s=s+a(i)*j=34+a(2)*100=234,j=j*10=1000 s=s+a(i)*j=

42、234+a(1)*10000=1234,j=j*10=10000 最终的输出结果是： 1234。 47 【正确答案】 n+2,exit do 【试题解析】 该累加问题没有给出需要累加的数据项的数目，不能用 for循环。do. Loop为无条件循环，在 do循环中由累加项 term的值作为退出循环的条件。 48 【正确答案】 赋值 49 【正确 答案】 ReDim a(2) 【试题解析】 ReDim语句：在过程级别中使用，用于为动态数组变量重新分配存储空间。 语法： ReDim Preservevarname(subscripts)As type,varname(subscripts)As ty

43、pe可以使用 ReDim语句反复地改变数组的元素以及维数的数目，但是不能在将一个数组定义为某种数据类型之后，再使用 ReDim将该数组改为其他数据类型，除非是 Variant所包含的数组。 如果将数组改小，则被删除的元 素中的数据就会丢失。如果按地址将数组传递给某个过程，那么不要在该过程内重定义该数组的各维的大小。 Erase语句重新初始化大小固定的数组的元素，以及释放动态数组的存储空间 (但不能重新定义数组 )。 语法： Erase arraylist 所需的 arraylist参数是一个或多个用逗号隔开的需要清除的数组变量。 说明： Erase根据是固定大小 (常规的 )数组还是动态数组，来采取完全不同的行为。Erase无需为固定大小的数组恢复内存。 Erase释放动态数组所使用的内 存。在下次引用该动态数组之前，程序必须使用 ReDim语句来重新定义该数组变量的维数。 50 【正确答案】 4 【试题解析】 所谓素数就是指只能被 1和其本身整除，不能被其他任何数整除的数。本题函数中是先将 a与 2比较，小于 2的返回 False，大于 2的返回 True。再用 Do WhileLoop 循环判断大于 4的数是否为素数，所以非素数 4就被错判为素数了。如果将程序修改正确，那么循环的条件需要修改为 k =a/2 And isprime。