【计算机类职业资格】二级VISUAL+BASIC笔试-89及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试-89及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-89及答案解析.doc（30页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试-89 及答案解析(总分：81.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.下列程序段的执行结果为X=2 Y=5If X * Y 1 Then Y=Y - 1 Else Y=-1Print Y-X0（分数：2.00）A.TrueB.FalseC.-1D.12.开发软件所需高成本和产品的低质量之间有着尖锐的矛盾，这种现象称作（分数：2.00）A.软件投机B.软件危机C.软件工程D.软件产生3.以下不属于对象的基本特点的是（分数：2.00）A.分类性B.多态性C.继承性D.封装性4.下列程序段，在运行时最后输出的内容是a=2c=1

2、AAA:c=c + aIf c10 ThenPrint cGoTo AAAElsePrint “10 以内的奇数显示完毕“End If（分数：2.00）A.3B.7C.9D.10 以内的奇数显示完毕5.执行下列程序后，鼠标单击窗体，输出结果为。Private Sub Form_Click()Print“Click”；End SubPrivate Sub Form_MouseDown(Button As Integer，Shift_As Integer，X As Single，Y As Single)Print “Donw”End SubPrivate Sub Form_MouseUp(Butt

3、on As Integer，Shift_As Integer，X As Single，Y As Single)Print“Up”End Sub（分数：2.00）A.DownUpClickB.ClickDownUpC.DownClickUpD.UpDownClick6.以下能够正确计算 n!的程序是（分数：2.00）A.Private Sub Command1 Click()n=5：x=1Dox=x * II=I + 1 Loop While I nPrint xEnd SubB.Private Sub Command1_Click()n=5：X=1：I=1DoX=X*II=I + 1Loop

4、While I nPrint xEnd SubC.Private Sub Command1_Click()n=5：X=1：I=1DoX=X * II=I + 1Loop While I=nPrint XEnd SubD.Private Sub Command1_Click()n=5：X=1：I=1Dox=x * II=I + 1Loop While InPrint XEnd Sub7.串的长度是（分数：2.00）A.串中不同字符的个数B.串中不同字母的个数C.串中所含字符的个数且字符个数大于零D.串中所含字符的个数8.在设计阶段，当双击窗体上的某个控件时，打开的窗口是（分数：2.00）A.工程

5、资源管理器窗口B.工具箱窗口C.代码窗口D.布局窗口9.在计算机中，算法是指（分数：2.00）A.加工方法B.解题方案的准确而完整的描述C.排序方法D.查询方法10.变量 L 的值为-8，则-L2 的值为（分数：2.00）A.64B.-64C.16D.-1611.有如下程序：Private Sub Command1_Click()Dim k As Integer，m As IntegerDim p As Integerk=4：m=1p=PC(k，m)：Print p；p=PC(k，m)：Print pEnd SubPrivate Function PC(a As Integer，b As In

6、teger)Static m As Integer，i As Integerm=0：i=2i=i + m + 1m=i + a + bPC=mEnd Function程序运行后，输出的结果为（分数：2.00）A.4 6B.6 6C.8 8D.10 1212.单击一次命令按钮后，下列程序的执行结果为Private Sub Command1_Click()Dim m As Integer，I As Integer，x(10) As IntegerFor I=0 To 4：x(I)=I+1：Next IFor I=1 TO 2：Call Prioc(x)：Next IFor I=0 TO 3：Pri

7、nt x(I)；：Next IEnd Sub Private Sub Prioc(a()As Integer)Static I As IntegerDoa(I)=a(I)+a(I+1)I=I+1Loop While I2End Sub（分数：2.00）A.3 4 7 5B.3 5 7 4C.1 2 3 4D.1 2 3 513.数据库、数据库系统和数据库管理系统之间的关系是（分数：2.00）A.数据库包括数据库系统和数据库管理系统B.数据库系统包括数据库和数据库管理系统C.数据库管理系统包括数据库和数据库系统D.3 者没有明显的包含关系14.有如下程序：Private Sub Command1

8、 Click()Dim a As SingleDim b As Singlea=5：b=4Call S(a，B) End SubSub S(x As Single，y As Single)t=xx=t/yy=t Mod yEnd Sub在调用运行上述程序后，a 和 b 的值分别为（分数：2.00）A.0 0B.1 1C.2 2D.1 215.在窗体上画一个命令按钮，然后编写下列程序：Private Sub Command12_Click()Tt 3End SubSub Tt(a As Integer)Static X As IntegerX=X * a + 1Print x；End Sub连续

9、三次单击命令按钮，输出的结果是（分数：2.00）A.1 5 8B.1 4 13C.3 7 4D.2 4 816.下面不属于软件设计原则的是（分数：2.00）A.抽象B.模块化C.自底向上D.信息隐蔽17.要使文件列表框中的文件随目录列表框中所选择的当前目录的不同而发生变化，应该（分数：2.00）A.在 File1 中的 Change 事件中，输入 File1Path=Dir1PathB.在 Dirl 中的 Change 事件中，输入 File1Path=Dir1PathC.在 File1 中的 Change 事件中，输入 Dir1Path=File1PathD.在 Dir1 中的 Change

10、 事件中，输入 Dir1Path=File1Path18.在计时器控件中，Interval 属性的作用是（分数：2.00）A.决定是否响应用户的操作B.设置计时器事件之间的间隔C.存储程序所需要的附加数据D.设置计时器顶端和其容器之间的距离19.使用语句 Dim A(2) As Integer 声明数组 A 之后，以下说法正确的是（分数：2.00）A.A 数组中的所有元素都为 0B.A 数组中的所有元素值不确定C.A 数组中所有元素值都为 EmptyD.执行 Erase A 后，A 数组中所有元素值都不为 020.关系模型允许定义 3 类数据约束，下列不属于数据约束的是（分数：2.00）A.实

11、体完整性约束B.参照完整性约束C.域完整性约束D.用户自定义的完整性约束21.以下事件过程可以将打开的对话框的标题改为“新时代”的是（分数：2.00）A.Private Sub Command2_Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowOpenEnd SubB.Private Sub Command2 Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowFontEnd SubC.Private Sub Command2_Click()CommonDialog1Dialog

12、Title=“新时代“CommonDialog1Show End SubEnd SubD.Private Sub Command2_Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowColorEnd Sub22.下面说法不正确的是（分数：2.00）A.变量名的长度不能超过 255 个字符B.变量名可以包含小数点或者内嵌的类型声明字符C.变量名不能使用关键字D.变量名的第一个字符必须是字母23.下列日期型数据正确的是（分数：2.00）A.January 10，1979B.#January 10，1997#C.“January 10，199

13、7“D.第二次调用 Tt 过程时，因为 x 为静态变量，所以它的值为上次调用后的值，即为 1，加上乘以 a 加 1 后，x 的值变为 4，输出结果为 4；同理，第三此调用后输出结果为 13。16.下面不属于软件设计原则的是（分数：2.00）A.抽象B.模块化C.自底向上 D.信息隐蔽解析：解析：软件设计遵循软件工程的基本目标和原则，建立了适用于在软件设计中应该遵循的基本原理和与软件设计有关的概念，它们是抽象、模块化、信息隐蔽和数据独立性。自底向上是集成测试中增量测试的一种。17.要使文件列表框中的文件随目录列表框中所选择的当前目录的不同而发生变化，应该（分数：2.00）A.在 File1 中的

14、 Change 事件中，输入 File1Path=Dir1PathB.在 Dirl 中的 Change 事件中，输入 File1Path=Dir1Path C.在 File1 中的 Change 事件中，输入 Dir1Path=File1PathD.在 Dir1 中的 Change 事件中，输入 Dir1Path=File1Path解析：解析：此题考查的是文件列表框与目录列表框的关联问题。当用户触发文件的 Change 事件时，文件的列表随着目录位置的改变而改变，其中目录为源操作数，位于等号右边，文件为目的操作数，位于等号的左边，所以正确答案为 B)选项。18.在计时器控件中，Interval

15、 属性的作用是（分数：2.00）A.决定是否响应用户的操作B.设置计时器事件之间的间隔 C.存储程序所需要的附加数据D.设置计时器顶端和其容器之间的距离解析：解析：在计时器控件中，Interval 属性用来设置计时器事件之间的间隔，单位是毫秒，取值范围是 065535，因此最大时间间隔不能超过 65 秒，如果把 Interval 属性设置为1000，则表明每秒钟发生一个计时器事件。所以，本题的正确答案是选项 B)19.使用语句 Dim A(2) As Integer 声明数组 A 之后，以下说法正确的是（分数：2.00）A.A 数组中的所有元素都为 0 B.A 数组中的所有元素值不确定C.A

16、数组中所有元素值都为 EmptyD.执行 Erase A 后，A 数组中所有元素值都不为 0解析：解析：所谓数组就是能够保存具有数据类型的多个数值的存储空间，当声明一个数值数组后，在没有给它赋值前，数组中的所有元素值为 0，所以 A)是正确的；Erase 语句的作用是释放动态数组所占的内存空间，所以 D)选项也不正确。只有选项A)正确。20.关系模型允许定义 3 类数据约束，下列不属于数据约束的是（分数：2.00）A.实体完整性约束B.参照完整性约束C.域完整性约束 D.用户自定义的完整性约束解析：解析：关系模型允许定义 3 类数据约束，它们是实体完整性约束、参照完整性约束及用户自定义的完整性

17、约束。其中前两种完整性约束由关系数据库系统支持，对于用户自定义的完整性约束，则由关系数据库系统提供完整性约束语言，用户利用该语言给出约束条件，运行时由系统自动检查。21.以下事件过程可以将打开的对话框的标题改为“新时代”的是（分数：2.00）A.Private Sub Command2_Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowOpenEnd SubB.Private Sub Command2 Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowFontEnd SubC.P

18、rivate Sub Command2_Click()CommonDialog1DialogTitle=“新时代“CommonDialog1Show End SubEnd SubD.Private Sub Command2_Click()CommonDialog1DialogTitle=“新时代“CommonDialog1ShowColorEnd Sub解析：解析：无需多看，一看就可以看出选项 A)是正确的；下面来分析一下。首先，设置标题属性用 DialogTide 属性，四个选项都一样，所以这个不是区别；再看方法，选项 A)用的是 ShowOpen 方法，即打开对话框，所以是正确的；选项 B

19、)用的是 ShowFont方法，是字体设置对话框，不符合本题的意思，不正确；选项 C)用的是 Show 方法，但是对话框没有此方法，所以也不正确；最后选项 D)是用的 ShowColor 方法，是颜色选择对话框，所以也不符合本题的意思。22.下面说法不正确的是（分数：2.00）A.变量名的长度不能超过 255 个字符B.变量名可以包含小数点或者内嵌的类型声明字符 C.变量名不能使用关键字D.变量名的第一个字符必须是字母解析：解析：在 Visual Basic 中，可以用名字来表示内存的位置，以便访问内存中的数据。有关变量命名的规则如下：名字只能由字母、数字和下划线组成；名字的第一个字符必须是英

20、文字母，最后一个字符可是是类型说明符；名字的有效字符为 255 个；不能用 Visual Basic 的保留字作变量名，但可以把保留字嵌入变量名中；同时变量名也不能是末尾带有类型说明符的保留字，例如变量 Print 和 Print$是非法的，而变量 Print_Number 是合法的。23.下列日期型数据正确的是（分数：2.00）A.January 10，1979B.#January 10，1997# C.“January 10，1997“D.&January 10，1997&解析：解析：用“#”括起来的部分表示日期。用双引号括起来的部分表示字符串常量。VisualBasic 中用“&”括起来

21、的部分表示八进制长整型数。24.下列语句中，不能实现循环 100 次的是（分数：2.00）A.N=0DoN=N+1Loop Until N=100B.N=0DoN=N+1Loop While n100C.N=0N=N+1DoLoop Until N100 D.N=0Do While n100N=N+1Loop解析：解析：选项 C)中循环终止条件为 N100，在第一次循环时该条件就为 True，所以只执行一次，不能循环 100 次。25.下列说法错误的是（分数：2.00）A.Caption 为只读属性，运行时对象的名称不能改变 B.设置 Height 或 Width 的数值单位为 twip，是

22、1 点的 1/20C.Icon 属性用来设置窗体最小化时的图标D.用来激活属性窗口的快捷键是 F4 键解析：解析：Caption 不是只读属性，在设计阶段可以在属性窗口中设置，也可以用代码在运行时设置，不同的运行状态可以有不同的 Caption 属性值，所以选项 A)的表述是不正确的；Height 和 Width 的默认的单位是 twip，1twip 等于 1/1440 英寸，是 1 点的1/20，故选项 B)是正确的；Icon 属性是用来设置窗体最小化图标的，所以选项 C)的表述是正确的；用来激活属性窗口的快捷键是 F4 键，所以选项 D)也是正确的。26.数据结构作为计算机的一门学科，主要

23、研究数据的逻辑结构、对各种数据结构进行的运算，以及（分数：2.00）A.数据的存储结构 B.计算方法C.数据映象D.逻辑存储解析：解析：数据结构是研究数据元素及其之间的相互关系和数据运算的一门学科，它包含 3 个方面的内容，即数据的逻辑结构、存储结构和数据的运算。27.下列 SQL 语句中，用于修改表结构的是（分数：2.00）A.ALTER B.CREATEC.UPDATED.INSERT解析：解析：SQL 语句中凡创建都用 CREATE，删除都用 DROP，改变用 ALTER，再跟类型和名字，附加子句。28.单击命令按钮时，下列程序的执行结果为Private Sub Command1_Cli

24、ck()Dim a As Integer，b As Integer，c As Integera=2：b=3：C=4Print P2(c，b，（分数：2.00）A.End SubPrivate Function P1(x As Integer，y As Integer，z As Integer)P1=2 * X + y + 3 * zEnd FunctionPrivate Function P2(x As Integer，y As Integer，z As Integer)P2=P1(z，x，y) + XEnd FunctionA) 21 B.19C.17D.34解析：解析：对于多个过程或函数依

25、次调用和处理与简单过程调用处理一样，本题先调用函数 P2，而函数 P2 又调用函数 P1，结果返回的顺序是从 P1 到 P2，P2 计算后输出到调用的地方。29.下列说法不正确的是（分数：2.00）A.对象的操作由对象的属性、事件和方法来描述B.Visual Basic 是面向对象的程序设计，Visual Basic 中只有窗体和控件两种对象 C.属性是对象的特征，不同的对象有不同的属性D.对象事件在代码窗口中体现过程解析：解析：对象的操作可由对象的属性、事件和方法来描述，所以选项 A)正确；在 Visual Basic 中的对象除了窗体和控件外还有其他的一些对象，如打印机、调试、剪贴板等，所

26、以选项 B)说“只有窗体和控件两种对象”是不正确的；属性是对象的特征，不同的对象有不同的属性，所以选项 C)的表述是正确的；事件是通过代码来实现的，所以选项 D)对象事件在代码窗口中体现过程是正确的。30.如果要设计一个多窗体程序时，要设计一个封面窗体(名称(Name)为 FormCover，标题(Caption 为“多媒体演示”)，其内部的各控件及其属性见下表。则设计出的窗体可能是（分数：2.00）A. B.C.D.解析：解析：在多重窗体程序中，要建立的界面由多个窗体组成，每个窗体的界面设计都跟单个窗体的设计一样，无非是多了一个添加窗体的过程。首先要添加一个窗体，通过“工程”菜单中的“添加窗

27、体”命令向工程中添加一个窗体，然后向窗体中添加所需要的控件，最后设置各控件的属性；选项 B)用的文本框而不是图片框，所以不正确；选项 C)命令按钮的标题也没有按照题目要求的设置为“演示”和“结束”，也没有用图片框而用的文本框，所以不正确；选项 D)用了图像框而没有用图片框，命令按钮的标题也没有按照题目要求的设置为“演示”和“结束”，所以不正确。31.下面程序段的运行结果是a=1b=1Doa=a+1b=b + 1Loop Until b5Print“k=“；a；Spc(4)；“b=“；b+a（分数：2.00）A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=12 解析：解析

28、：本题中的 Do-Loop Until 循环为直到型循环结构，直到条件 b5为止，此时 a=6，b=6，所以最后输出的结果是 k=6 b=12。所以正确答案是选项 D)。32.下列说法错误的是（分数：2.00）A.标准模块也称程序模块文件，扩展名是.basB.标准模块由程序代码组成C.标准模块只用来定义一些通用的过程 D.标准模块不附属于任何一个窗体解析：解析：标准模块不仅可以用来定义一些通用的过程，还可以用来声明一些全局变量，所以 C 是不正确的；标准模块也称为程序模块文件，其扩展名是bas，所以选项 A)是正确的；正因为标准模块是程序模块文件，必然是程序代码组成，所以选项 B)是正确的；标

29、准模块不属于任何个固定的窗体，在工程中公用的，所以选项 D)是正确的。33.单击命令按钮时，下列程序的执行结果是Private Sub Book(x As Integer)x=x * 2 + lIf x6 ThenCall Book(x)End IfX=X * 2 + 1Print x；End SubPrivate Sub Command2_Click()Book2End Sub （分数：2.00）A.23 47 B.10 36C.22 44D.24 50解析：解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用 Book 过程，把实参 2 传递给 Book 过程中的形参

30、 x，由 x = x * 2 + 1 语句推出 x = 5，此时满足 Book 过程体中判断语句的判断条件，执行 Call Book(x)语句，第二次调用 Book 过程。由 x = x * 2 + 1 语句得到 x 值为11，判断条件 1l6 为假，故返回此调用过程执行 x = x * 2 + 1 语句，的 x = 23 并输出，结束此次调用过程。由于两次调用 Book 过程，第二次仍返回调用时的断点语句，即执行 x = x * 2 + 1，Print x，输出 x 的值为 47，返回到主调过程，结束程序，两次输出为 2347，正确答案为选项 A)。34.有如下事件过程，当同时按下转换键 S

31、hift 和功能键 F5 时其最后输出的信息是Const ShiftKey=1Const CtrlKey=2Const Key_F5=&H74Const Key_F6=&H75Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)If KeyCode=Key_F5 And Shift=ShiftKey ThenPrint“Press Shift+F5“ElseIf KeyCode=Key_F6 And Shift=CtrlKey ThenPrint“Press Ctrl+F6“End IfEnd Sub（分数：2.00）A.

32、无任何信息B.Press Shift+F5 C.Press Ctrl+F6D.程序出错解析：解析：上述事件过程是测试两个参数(KeyCode 和 Shift)是否同时满足给定的条件，如果满足则输出相应的信息；题目中是同时按下转换键 Shift 和功能键 F5，所以满足给定的条件，则输出信息 Press Shift+F5，故正确的答案是选项 B)。35.开发大型软件时，产生困难的根本原因是（分数：2.00）A.大系统的复杂性 B.人员知识不足C.客观世界千变万化D.时间紧、任务重解析：解析：软件的显著特点是规模庞大，复杂度超线性增长，在开发大型软件时，要保证高质量，极端复杂困难，不仅涉及技术问题

33、，更重要的是必须要有严格而科学的管理。二、填空题(总题数：11，分数：11.00)36.长度为 n 的顺序存储线性表中，当在任何位置上插入一个元素概率都相等时，插入一个元素所需移动元素的平均个数为 【1】 。（分数：1.00）填空项 1:_ （正确答案：【1】n/2）解析：解析：在线性表的任何位置插入一个元素的概率相等，即概率为 p=1/(n+1)，则插入一个元素时所需移动元素的平均次数为 E=l/(n+1)*(n-i+1)=n/2。37.用树结构表示实体类型及实体间联系的数据模型称为 【2】 。（分数：1.00）填空项 1:_ （正确答案：【2】层次模型）解析：解析：用树结构表示实体类型及实

34、体间联系的数据模型称为层次模型，用有向图结构表示实体类型及实体间联系的数据模型称为网状模型，用二维表格结构表示实体及其联系的数据模型称为关系模型。38.类是一个支持集成的抽象数据类型，而对象是类的 【3】 。（分数：1.00）填空项 1:_ （正确答案：【3】实例）解析：解析：将属性、操作相似的对象归为类，也就是说，类是具有共同属性、共同方法的对象的集合。所以，类是对象的抽象，对象则是其对应类的一个实例。39.数据流图的类型有 【4】 和事务型。（分数：1.00）填空项 1:_ （正确答案：【4】变换型）解析：解析：典型的数据流类型有两种：变换型和事务型。变换型是指信息沿输入通路进入系统，同时

35、由外部形式变换成内部形式，进入系统的信息通过变换中心，经加工处理以后再沿输出通路变换成外部形式离开软件系统；在很多软件应用中，存在某种作业数据流，它可以引发一个或多个处理，这些处理能够完成该作业要求的功能，这种数据流就叫做事务。40.当数据的物理结构(存储结构、存取方式等)改变时，不影响数据库的逻辑结构，从而不致引起应用程序的变化，这是指数据的 【5】 。（分数：1.00）填空项 1:_ （正确答案：【5】物理独立性）解析：解析：数据独立性是数据与程序间的互不依赖性，即数据库中数据独立于应用程序而不依赖于应用程序。也就是说，数据的逻辑结构、存储结构与存取方式的改变不会影响应用程序。数据独立性一

36、般分为物理独立性与逻辑独立性两级。41.在修改列表框内容时，RemoveItem 方法的作用是 【6】 。（分数：1.00）填空项 1:_ （正确答案：【6】用来删除列表中指定的项目）解析：解析：列表框可以使用 AddItem、Clear 和 RemoveItem 等方法，用来在运行期间改变列表框的内容。AddItem 方法用来在列表框中插入一行文本，格式为：列表框AddItem 项目字符串，索引值；Clear方法用来清除列表框中的全部内容，格式为：列表框Clear；RemoveItem 方法用来删除列表中指定的项目，格式为：列表框RemoveItem 索引值。42.请填写下列空白，以实现运行

37、后形成一个主对角线上元素值为 1，其他元素为 0 的 66 阶矩阵。Private Sub Command1 Click()Dim s(6，6)For i=1 To 6For j=1 To 6If i=j Then【7】 Else【8】 End IfPrint 【9】 Next jPrintNext iEnd Sub（分数：1.00）填空项 1:_ （正确答案：【7】s(i，j)=1【8】s(i，j) =0【9】 s(i，j)）解析：解析：此程序段开始声明了一个二维数组，用两个 ForNext 语句嵌套使用为其赋值，当满足条件i = j 时，s(i，j)=1，当不满足 i=j 时，s(i，j)

38、=0；最后输出数据，即在屏幕上输出 66 阶矩阵。43.以下过程的作用是将 26 个小写字母逆序打印出来，请补充完整。Sub Inverse1For i=122 To 【10】 Print 【11】 ；Next iEnd Sub（分数：1.00）填空项 1:_ （正确答案：【10】97 Step -1【11】Chr$(i)）解析：解析：每一个字母都有对应的 ASCII 码，大写字母从 A 到 Z 对应的 ASCII 码为从 65 到 90，小写字母 a 到 z 对应的 ASCII 码为 97 到 122；所以要把 26 个小写字母打印出来，ASCII 码的条件语句应为 122 To 97 St

39、ep -1 来表示。空白处应为“97 Step -1”；输出某个 ASCII 对应的字符用 Print Chr$(i)表示。44.在窗体上加上一个文本控件 PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示“打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。Private Sub Command1_Click1CommonDialog1Filter= 【12】 CommonDialog1ShowOpenPCSTextBoxText= 【13】 End Sub（分数：1.00）填空项 1:_ （正确答案：【12】“Text Files(*t

40、xt)|*txt“【13】CommonDialog1FileName）解析：解析：要设置通用对话框只用于打开文本文件，需要设置通用对话框的 Filter 属性值，在这里我们应该填写的是“Text Files(*txt)| *txt“；在使用了对话框控件的 ShowOpen 后出现的打开文件对话框中的文件类型只有 Text Files(*txt)|*.txt，选择了需要打开的文本文件后，应该让文件的文件名显示在文本框中，因此需要将通用对话框中选择的文件赋给文本控件，即将对话框的 FileName 属性值赋给文本框的 Text 属性。45.随机文件使用 Put 语句写数据，使用 【14】 语句读数

41、据。（分数：1.00）填空项 1:_ （正确答案：【14】 Get）解析：解析：随机访问模式中文件的写操作使用 Put 命令，Put 命令是将一个记录变量的内容写入所代开的磁盘文件中指定的记录位置上；随机访问模式中文件的读操作使用 Get 命令，Get 命令是从磁盘文件将一条记录号指定的记录内容读入记录变量中。46.下列程序的功能是：将数据 1，2，8 写入顺序文件 Numtxt 中，请补充完整。Private Sub Form_Click() Dim i As IntegerOpen“Numtxt“For Output As #1For i=1 To 8【15】 Next iClose #1End Sub（分数：1.00）填空项 1:_ （正确答案：【15】Print #1，i）解析：解析：向文件中写入数据用 Print 语句。