1、VB 笔试模拟试卷 165及答案与解析 1 下列选项中不符合良好程序设计风格的是 （ A）源程序要文档化 （ B）数据说明的次序要规范化 （ C）避免滥用 goto语句 （ D）模块设汁要保证高耦合、高内聚 2 软件开发模型包括 瀑布模型 扇形模型 快速原型法模型 螺旋模型 （ A） 、 、 （ B） 、 、 （ C） 、 、 （ D） 、 、 3 软件开发的结构化生命周期方法将软件生命周期划分成 （ A）定义、开发、运行维护 （ B）设计阶段、编程阶段、测试阶段 （ C） 总体设计、详细设计、编程调试 （ D）需求分析、功能定义、系统设计 4 单个用户使用的数据视图的描述称为 （ A）外模式
2、 （ B）概念模式 （ C）内模式 （ D）存储模式 5 数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及 （ A）数据的存储结构 （ B）计算方法 （ C）数据映象 （ D）逻辑存储 6 设有关系 R和 S，关系代数表达式为 R-(R-S)表示的是 （ A） RNS （ B） R-S （ C） RUS （ D） RS 7 下列叙述中正确的是 （ A）一个算法的空间复杂度大，则其时间复杂度也必定大 （ B）一个算法的空间复杂度大，则其时间复杂度必定小 （ C）一个算法的时间复杂度大，则其空间复杂度必定小 （ D）上述 3种说法都不对 8 对长度为 n的线性表
3、进行顺序查找，在最坏情况下所需要的比较次数为 （ A） log2n （ B） n/2 （ C） n （ D） n+1 9 数据库技术的根本目标是要解决数据的 （ A）存储问题 （ B）共享问题 （ C）安全问题 （ D）保护问题 10 若某二叉树的前序遍历访问顺序是 abdgcefh，中序遍历访问顺序 是 dsbaechf，则其后序遍历的节点访问顺序是 （ A） bdgcefha （ B） Sdbecfha （ C） bdgaechf （ D） Sdbehfea 11 一个工程中含有窗体 Form1、 Form2和标准模块 Model1，如果在 Form1中有语句 Public X As In
4、teger，在 Model1中有语句 Public Y As Integer。则以下叙述中正确的是 （ A）变量 X、 Y的作用域相同 （ B） Y的作用域是 Medel1 （ C）在 Form1中可以直接使用 X （ D）在 Form2中可以直接使 用 X和 Y 12 设 A$=“北京 “， B$=“Shanghai“，则表达式 LEFTS(A$， 2) +STRINGS(3， “-“)+LEFTS(B$， 8)构成的字符串是 （ A）北京 - （ B）北京 -Shanghai （ C） Shanghai （ D）北京 Shanghai 13 有如下事件过程： Private Sub For
5、m_KeyDown(KeyCode As Integer， Shift As Integer) If (Button And 3) =3 Then Print “OK“ End If End Sub 程序运行后，为了在窗体上输出 “OK”，应当按下的鼠标键是 （ A）左键 （ B）右键 （ C）同时按下左键和右键 （ D）按什么键都不显示 14 新建一个窗体，其 BorderStyle属性设置为 Fixed Single，但运行时却没有 “最大化 ”和 “最小化 ”按钮，可能的原因是 （ A） Border Style的值设为 Fixed.Sinde，此项设置值的作用即禁止 “最大化 ”和 “
6、最小化 ”按钮 （ B）窗体的 MaxButton和 MinButton值设为 False （ C）正常情况下新 建的窗体都没有 “最大化 ”和 “最小化 ”按钮 （ D）该窗体可用鼠标拖动边框的方法改变窗体的大小 15 设有数组定义语句： Dim a(5) As Integer， List1为列表框控件。下列给数组元素赋值的语句错误的是 （ A） a(3)=3 （ B） a(3)=InputBox(“inputdata“) （ C） a(3)=List1.Listlndex （ D） a=Array(1， 2， 3， 4， 5， 6) 16 文本框控件中将 Text的内容全部显示为所定义的字
7、符的属性项是 （ A） PasswordChar （ B）需要编程来实现 （ C） Password （ D）以上都不是 17 设置组合框的风格，可用的属性是 （ A） Backstyle （ B） Borderstyle （ C） Style （ D） Sorted 18 在窗体上画一个命令按钮，名称为 Command1。然后编写如下程序： Private Sub Command1_Click() For I=1 To 2 For J=1 To I Print String(I， “Hello“)； Next J Print Next I End Sub 程序 运行后，如果单击命令按钮，则在
8、窗体上显示的内容是 （ A） H HH HH （ B） H HHHH （ C） HHHHH （ D） H HH HHHH 19 设用复制、粘贴的方法建立了一个命令按钮数组 Command1，以下对该数组的说法错误的是 （ A）命令按钮的所有 Caption属性都是 Command1 （ B）在代码中访问任意一个命令按钮只需使用名称 Command1 （ C）命令按钮的大小都相同 （ D）命令按钮共享相同的事件过程 20 下列程序段的执行结果为 a=6 For k=1 T00 a=a+k Next Print k； a （ A） -1 6 （ B） -1 16 （ C） 1 6 （ D） 11
9、21 21 在用通用对话框控件建立 “打开 ”或 “保存 ”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件 (即 .txt文件 )，则正确的描述格式是 （ A） text(.txt)|(*.txt) （ B）文本文件 (.txt|(.txt) （ C） text(.txt)FFFFF|(*.txt) （ D） text(.txt) (*.text) 22 假定有一个菜单项，名为 Menuhem，为了在运行时使该菜单项失效 (变灰 )，应使用的语句为 （ A） MenuItem.Enabled=False （ B） MenuItem.Enabled=True （ C） MenuI
10、tem.Visible=True （ D） MenuItem.Visible=Flase 23 Sub过程与 Function过程最根本的区别是 （ A） Sub过程不能返回值，而 Function过程能返回值 （ B） Function过程可以有形参， Sub过程不可以 （ C） Sub过程可以使用 Call语句直接使用过程名调用，而 Function 过程不可以 （ D）两种过程参数的传递方式不同 24 在窗体上画一个文本框 (其 Name属性为 Text1)，然后编写如下事件过程： Private Sub Form_Load() Text1.Text=“ Text1.SetFocus F
11、or i=1 To 9 Sum=Sum=i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 （ A）在文本框 Text1中输出 45 （ B）在文本框 Text1中输出 0 （ C） 出错 （ D） 在文本框 Text1中输出不 定值 25 如果在 C盘当前文件夹下已存在名称为 studata.dat的顺序文件，那么执行语句Open “C:studata.dat“ For Append As#1之后，将 （ A）删除文件中原有内容 （ B）保留文件中原有内容，并在文件尾填加新内容 （ C）保留文件中原有内容，并在文件头填加新内容 （ D）以上均不对 26 保存
12、一个工程至少应保存两个文件，这两个文件分别是 （ A）文本文件和工程文件 （ B）窗体文件和工程文件 （ C）窗体文件和标准模块文件 （ D）类模块文件和工程文件 27 阅读下面的程序段： For a=1 To 2 For b=1 To a For c=b To 2 i=i+1 Next Next Next Print i 执行上面的 3重循环后， i的值为 （ A） 4 （ B） 5 （ C） 6 （ D） 9 28 下列各种形式的循环中，输出 “*”的个数最少的循环是 （ A） a=5:b=8 Do Print “*“ a=a+1 Loop While a b （ B） a=5:b=8 D
13、o Print “*“ a=a+1 Loop Until a b （ C） a=5:b=8 Do Until a-b Print “*“ b=b+1 Loop （ D） a=5:b=8 Do Until a b Print “*“ a=a+1 Loop 29 如果准备读文件，打开顺序文件 “text.dat“的正确语句是 （ A） Open “text.dat“ For Write As#1 （ B） Open “text.dar“ For Binary As#1 （ C） Open “text.dat“ For Input As#1 （ D） Open “text.dat“ For Rand
14、om As#1 30 要获得文件列表框中当前被选中的文件的文件名，则应使用哪个属性 （ A） Dir （ B） Path （ C） Drive （ D） FileName 31 有如下函数过程： Function Fun(By Val x As Ingeger， ByVal y As Integer) As Integer DO While y 0 reminder=x Mod y x=y y=reminder Loop Fun=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Intege
15、r Dim b As Integer a=100:b=25 x=Fun(a,B)Print x End Sub （ A） 0 （ B） 25 （ C） 50 （ D） 100 32 可以用做其他控件容器的控件是 （ A）窗体控件，列表框控件，图像控件 （ B）窗体控件，文本框控件，框架控件 （ C）窗体控件，框架控件，图片框控件 （ D）窗体控件，标签控件，图片框控件 33 在窗体上添加一个 R命令按钮，名称为 Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为 Option Base 1 PrivateSub Command1_Click() Dim a As Varia
16、nt a=Array(1， 2， 3， 4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub （ A） 4321 （ B） 1234 （ C） 34 （ D） 12 34 下列语句中正确的是 （ A） If AB Then Print “A不等于 B“ （ B） If A B Then Printf “A不等于 B“ （ C） If A B Then Print “A不等于 B“ （ D） If AB Print “A不等于 B“ 35 下面程序运行后，输出的结果是 Dim arr(3， 3) For j=1 To
17、3 For k=1 To 3 Art(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For k=2 To 3 Print arr(k,j)； Next k Print Next j （ A） 25 36 （ B） 58 69 （ C） 47 58 （ D） 59 68 36 测试用例包括输入值集和 _值集。 37 在树形结构中，树根节点没有 _。 38 数据结构分为逻辑结构与存储结构，线性链表属于 _。 39 一个项目具有一个项目主管，一个项目主管可管理多个项目，则实体 “项目主管 ”与实体 “项目 ”的联系属于 _的联系。 40 数据库设计分为以下 6个
18、设计阶段：需求分析阶段、 _、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。 41 下列程序计算 Sn的值。 Sn=a+aa+aaa+aaaa ，其中最后一项为 n个。 例如： a=5， n=4时，则 Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。 Private Sub Command1_Click() Dim a As Integer， n As Integer， Cout As Integer Dim Sn As Long， Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox(“请输入 a的值： “) n=InputB
19、ox(“请输入 n的值 !“) Do Tn=Tn*10+a Sn=Sn+Tn Cout=Cout+1 _ Debug Print a， n， Sn End Sub 42 用户可以用 _语句定义自己的数据类型。 43 下列程序运行后的输出结果是 _。 Private Sub f(k， s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Command1_Click() Sum=0 For i=1 To 3 Call f(i， s) Sum=Sum+s Next Print Sum End Sub 44 函数 Int(Rnd*10)+10的值的范围
20、是 _。 45 有如下函数过程： Function gys(By Val x As Integer， By Val y As Integer) As Integer Do While y0 preminder=x/y x=y y=preminder Loop gys=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 _。 Private Sub Command1_Click() Dim a As Integer， b As Integer a=10:b=2 x=gys(a， B)Print x End Sub 46 下列程序的功能是：将数据 1， 2， ， 8写入顺
21、序文件 Num.txt中，请补充完整。 Private Sub Form_Click() Dim i As Integer Open “Num.txt“ For Output As #1 For i=1 To 8 _ Next Close#1 End Sub 47 执行下面程序，第一行输出结果是 ，第二行输出结果是 。 Option Explicit Private Sub Form_Click() Dim A As Integer A=2 Call Sub1(A)End Sub Private Sub1(x As Integer) x=x*2+1 If x 10 Then Call Sub1
22、(x) End If x=x*2+1 Print x End Sub 48 下面程序的功能是产生 10个小于 100(不含 100) 的随机正整数，并统计其中 5的倍数所占比例，但程序不完整，请补充完整。 Sub PR() Randomize Dim a(10) For i=1 To 10 a(i) =Int( ) If Then k=k+1 Print a(j) Next j Print Print k/10 End Sub VB 笔试模拟试卷 165答案与解析 1 【正确答案】 D 【试题解析】 程序设计风格是指编写程序时所表现出的特点、习惯和逻辑思路。著名的 “清晰第一，效率第二 ”的论
23、点已成为当今主导的程序设计风格。形成良好的程序设计风格，主要注意和考虑下述一些因素：源程序文档化、数据说明的次序规范化、避免滥用 goto语句等。除此之外，一般较优秀的软件设计尽量做到高内聚、低耦合，这样有利于提高软件模块的独立性。 2 【正确答案】 C 【试题解析】 软件开发模型包括瀑布模型、快速原型法模型和螺旋模型。 3 【正确答案】 A 【试题解析】 通常，将软件产品从提出、实 现、使用维护到停止使用的过程称为软件生命周期。它可以分为软件定义、软件开发及软件运行维护 3个阶段。 4 【正确答案】 A 【试题解析】 选项 A)正确，外模式是用户的数据视图，也就是用户所见到的数据模式；选项
24、B)不正确，全局数据视图的描述称为概念模式，即数据库中全部数据的整体逻辑结构的描述；选项 C)不正确，物理存储数据视图的描述称为内模式，即数据库在物理存储方面的描述；选项 D)不正确，存储模式即为内模式。 5 【正确答案】 A 【试题解析】 数据结构作为计算机的一门学科，主要研究和讨论以下 3个方面的问题： 数据集合中各数据元素之间所固有的逻辑关系，即数据的逻辑结构； 在对数据进行处理时，各数据元素在计算机中的存储关系，即数据的存储结构； 对各种数据结构进行的运算。 6 【正确答案】 A 【试题解析】 R-S 表示属于 R但不属于 S， R-(R-S)表示属于 R但不属于 (R-S)，即相当于
25、 RS。 7 【正确答案】 D 【试题解析】 算法的复杂度主要包括时间复杂度和空间复杂度。算法的时间复杂度是指执行算法所需要的计算工作量，可以用执行算法过程中所需基本运算的执行次数来度量；算法的空 间复杂度是指执行这个算法所需要的内存空间。根据各自的定义可知，算法的时间复杂度与空间复杂度并不相关。 8 【正确答案】 C 【试题解析】 对于长度为 n的有序线性表，在最坏情况下，二分查找只需要比较log2n 次，而顺序查找需要比较 n次。 9 【正确答案】 B 【试题解析】 由于数据的集成性使得数据可被多个应用程序共享，特别是在网络发达的今天，数据库与网络的结合扩大了数据库的应用范围，所以数据库技
26、术的根本问题是解决数据的共享问题。 10 【正确答案】 D 【试题解析】 前序遍历的第 一个节点 a为树的根节点；中序遍历中 a的左边的节点为 a的左子树， a的右边的节点为 a的右子树。再分别对 a的左右子树进行上述两步处理，直到每个节点都找到正确的位置。 11 【正确答案】 C 【试题解析】 在窗体声明部分声明的变量是窗体级变量，它只能在该窗体内直接使用，在标准模块中使用 Public声明的变量是全局变量，可以直接在工程中使用。 12 【正确答案】 B 【试题解析】 由于函数 Left$是从字符串的左边取出 N个字符， Unicode编码将一个汉字和一个西文字符都视为一个字符，因此函数值仍
27、 是：北京和 Shanghai，函数 String$返回 N个指定字符构成字符串，因此函数值是 -。将它们连接在一起构成字符串 “北京 -Shanghai“。 13 【正确答案】 D 【试题解析】 此题考查的是有关鼠标事件的问题。从题目要求来看，上述事件应是鼠标事件过程，下面来看看有关鼠标事件的具体事件。 按下鼠标键事件过程： Private Sub Form_MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single) End Sub 松开鼠标键事件过程： Private Sub Form_MouseUp(B
28、utton As Integer， Shift As Integer， X As Single， Y As Single) End Sub 移动鼠标光标事件过程： Privme Sub Form_MouseMove(Button As Interger， Shift As Integer， X As Single， Y As Single) End Sub 以上 3个鼠标事件过程具有相同的参数，含义如下： Button 表示被按下的鼠 标键； Shift表示 Shift、 Ctrl、 Alt键状态； X， Y表示鼠标光标的当前位置。 现在再来看一下事件过程，可知此事件过程并非鼠标事件过程，并且
29、 Button 也不是事件过程的参数，即此事件过程的两个参数 KeyCode和 Shift在程序运行过程中并没有得到任何信息，所以无论按什么键都不显示任何内容。 14 【正确答案】 B 【试题解析】 如果窗体的 BorderStyle属性设置为 FixedSingle，则窗体为固定单边框，可以包含控制菜单框、标题栏、最大化和最小化按钮，但要注意的是，如果窗口 的 MaxButton 和 MinButton 属性设置为 True，则可以使用，运行时显示最大化和最小化按钮；如果设置为 False，则运行时不显示。 15 【正确答案】 D 【试题解析】 Array 函数只能给变体类型变量数组初始化，
30、 a为整型数组，所以选项 D)错误。 16 【正确答案】 A 【试题解析】 PasswordChar属性返回或设置一个值，该值指示所键入的字符或占位符在 TextBox 控件中是否要显示出来；返回或设置用做占位符。 17 【正确答案】 C 【试题解析】 Style属 性返回或设置一个值，指定控件的行为或外观。 18 【正确答案】 B 【试题解析】 Click 事件是在按钮控件上按下然后释放一个鼠标按钮时发生。Print函数用于在指定窗口显示文本。 String 函数返回包含指定长度重复字符的字符串。题中嵌套 For循环，第一次 “i=1“，故 “for j=1 to 1“，输出 “H“，内层
31、J循环结束，输出空行。第二次 “i=2“，故 “for j=1 to 2“，内层 J循环 2次，输出“HHHH“，内层 J循环结束，输出空行， I循环结束。 19 【正确答案】 B 【试 题解析】 访问控件数组中的一个控件应使用名称加索引，如： 控件名称 (索引值 ) 20 【正确答案】 C 【试题解析】 For循环的一般格式是： For 循环变量 =初值 To 终值 Step步长 ) 语句 Exit For 语句 Next循环变量 该循环语句的执行过程为： “循环变量 ”首先取得 “初值 ”，检查是否超过 “终值 ”，如果超过，就不循环并跳出循环，属于 “先检查后执行 ”的类型。现在来看程序
32、段， For A=1 To 0 中，初值为 1，终值为 0，显然当 “循环变量 ”首先取得 “初值 ”1，检查后超过 “终值 ”0，所以一次也不执行，即最后执行 Print时， k=1，a=6。 21 【正确答案】 A 【试题解析】 Filter 属性用来指定在对话框中显示的文件类型， Filter的属性值由一对或多对文本字符串组成，每对字符串用管道符 “|”隔开，在 “|”前面的部分称为描述符，后面的部分一般为通配符和文件扩展名，称为 “过渡器 ”，如 *.txt等。 22 【正确答案】 A 【试题解析】 使菜单项不对用户产生的事件作出反应 (变灰 ) ，应把其 Enabled 属性设置为
33、False。 23 【正确答案】 A 【试题解析】 在 Visual Basic中有两类过程：一类是系统提供的内部函数和事件过程；另一类是用户根据自己的需要定义的，供事件过程的多次调用。在第二类过程中，涉及最多的是子过程。它们的共同点是完成某种特定功能的一组程序代码；不同的是函数是可以直接返回值的特殊过程，所以函数过程定义时有返回值的类型说明。两者最大的区别就是 Sub 过程不能直接返回值，而 Function 过程能直接返回值。 24 【正确答案】 C 【试题解析】 由于 Form_load 事件是在窗体加载时发生，所以此时窗体还没有显示，不 能用 “Text1.SetFocus”语句获得焦
34、点，故出错。如要改正，需要在此语句前加入 “Me.Show”，显示窗体，则可以看到文本框已获得焦点，并执行循环语句，输出 “45”。 25 【正确答案】 B 【试题解析】 Append 语句能向文件中继续加新的内容。 26 【正确答案】 B 【试题解析】 保存一个工程至少应保存窗体文件和工程文件。 27 【正确答案】 B 【试题解析】 本题是一个多重循环语句，是 ForNext 结构的多重叠用，仔细分析即可看出：在结构中， i=i+1共执行了 5次，所以最后 i的值为 5。 28 【正确答案】 C 【试题解析】 Do-Loop 循环的执行规则是： Do-LoopWhile|Until形式的循环
35、是先执行循环体，然后再进行条件判断； DoWhile|Until-Loop 形式的循环是先进行条件判断，然后决定是否执行循环体。 While表达式的含义是：若表达式为 “真 ”，则执行循环体；若表达式为 “假 ”，则结束循环。 Until表达式的含义是：若表达式为 “假 ”，则执行循环体；若表达式，为 “真 ”，则结束循环。 根据以上分析，选项 A)输 出 3个 “*”，选项 B)输出 1个 “*”，选项 C)没有输出“*”，选项 D)输出 4个 “*”。 29 【正确答案】 C 【试题解析】 顺序文件的读操作由 Input语句来实现。 30 【正确答案】 D 【试题解析】 本题考查文件列表框
36、控件的相关属性。 FileName属性用来设置或返回程序运行过程中当前选中的文件名称。 Path 属性用来设置或返回程序运行过程中当前选中的文件的路径。 31 【正确答案】 B 【试题解析】 本题的难点是子函数的调用过程。子函数 Fun 的功能是求 x和 y的公约 数，由 “欧几里德 ”求最大公约数的算法可知，当余数 r为 0时， x为 x和 y的最大公约数。变量 z的值通过子函数名 Fun 返回。 32 【正确答案】 C 【试题解析】 窗体控件、框架控件和图片框控件可以作为其他控件的容器。 33 【正确答案】 B 【试题解析】 本题的难点是数组在循环中的计算。计算过程为4100+3101+2
37、102+1103=1234，如果改成 For i=1 To 4后，其结果为 A)。 34 【正确答案】 C 【试题解析】 题中语句都属于条件语句中 “If 条件 Then 语句 ”类型。从选项中，可以看出条件语句是 A与 B 的比较语句，其值就是此条件语句的值，也就是说，只有当其值为真时，才执行 Then 语句。 35 【正确答案】 B 【试题解析】 依题意，声明一个 3行 3列的数组，并用嵌套 for循环赋值如下： arr(1,1)=1 arr(2,1)=4 arr(3,1)=7 arr(1,2) =2 arr(2,2) =5 arr(3,2) =8 arr(1,3) =3 arr(2,3)
38、 =6 arr(3,3) =9 最后用 Print函数输出 arr(2,2) ， arr(3,2) ，空行， arr(2,3)， arr(3,3)。 36 【正确答案】 输出 【试题解析】 软件测试用例是为了有效发现软件缺陷而编写的包含测试目的、测试步骤、期望测试结果的特定集合。正确认识和设计软件测试用例可以提高软件测试的有效性，便于测试质量的度量，增强测试过程的可管理性。软件测试用例包括输入值集和输出值集。测试用例是软件测试的核心。 37 【正确答案】 前件 【试题解析】 在树形结构中，每一个节点只有一个前件，称为父节点；没有前件的节点只有一个，称为树的根节点；每一个节点可以有 多个后件，它
39、们都称为该节点的子节点；没有后件的节点称为叶子节点。 38 【正确答案】 存储结构 【试题解析】 数据的逻辑结构是指反映数据元素之间逻辑关系的数据结构；数据的存储结构是指数据的逻辑结构在计算机存储空间中的存放形式。在数据的存储结构中，不仅要存放各数据元素的信息，还需要存放各数据元素之间前后件关系的信息。 39 【正确答案】 一对多 (或 1:N) 【试题解析】 两个实体集间的联系实际上是实体集间的函数系，这种函数关系可以有 3种，即一对一 (1:1)的联系、一对多 (1:N)或多对一 (N:1)的联系和多对多 (N:N)的联系。 40 【正确答案】 概念设计阶段 【试题解析】 数据库设计分为
40、6个设计阶段：需求分析阶段、概念设计阶段、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。 41 【正确答案】 Loop While Cout =n或 Loop Until Cout=n+1 【试题解析】 a和 n的值必须已知，表达式才能计算。但程序中没有给变量 n赋值的语句，可见第一个空白行应该填写给 n 赋值的语句。 Do循环应该有与之相对应的终端语句，可见第二个空白行应填写 Do循 环的终端语句，即 While语句，同时要构造出控制循环的 。程序中有四个赋值语句，其中有一个计数语句Cout=Cout+1，可见控制循环次数的变量应是 Cout。 42 【正确答案】 Type 【
41、试题解析】 用户可以用 Type语句来定义数据类型，格式是： Type 数据类型名 数据类型元素名 As 类型名 数据类型元素名 As 类型名 EndType 其中 “数据类型名 ”是要定义的数据类型的名字，其命名规则和变量的命名规则相同； “数据类型元素名 ”也遵守相同的规则，且不能是数组名； “类型名 ”可以是任何基本数据类型，也可以是用户定义的类型。 43 【正确答案】 9 【试题解析】 本题考查的重点是在子过程的调用过程中，虚实参数的传送问题，变量 s按十传送。子过程 f()求 n!， sum的计算过程为 1!+2!+3!=1+2+6=9 44 【正确答案】 (10,19) 【试题解析
42、】 Rnd 产生随机数的范围为 (0.111 0.999)；因此， Rnd*10的范围为(0.111 9.999) ； Int()函数是取整， Int(Rnd*10)取整后的范围为 (1 9)；再加上10，所以试值的取值范围为 (10 19)。 45 【正确答案】 5 【试题解析】 本题的难点是 Do WhileLoop 循环控制问题。 y=2、 5、 0.4的过程中，最后 x=5。 46 【正确答案】 Print#1， i 【试题解析】 向文件中写入数据时用 Print语句。 47 【正确答案】 23 , 47 【试题解析】 递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用 (或
43、间接调用 )本过程的过程。递归过程的关键部分就是要子过程函数 Sub1()被调用了多少次。当 x=2时调用了第一次，当 x=5时调用了第二次 ，当 x=11时不再调用，退出之前分别按 x=23和 x=47输出。 48 【正确答案】 (Rnd*99) +1,a(i) mod 5 【试题解析】 产生 10 个小于 100(不含 100) 的随机正整数，需要用到随机函数Rnd， Rnd函数是随机生成一个小于 1的正数随数，所以根据题意，填入代码为(Rnd*99)+1，而后面加上 1是为了能保证取到 99。根据题意可知， k 表示 a(i)中 5的倍数的个数，只有当 a(i) mod 5=0时， k=k+1。
