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

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

1、二级 VISUAL+BASIC-4-1 及答案解析(总分：80.50，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：54.50)1.执行以下程序段后，变量 c$的值为U /U。S$=“VisualBasicProgramming“b$=“Quick“c$=b$&UCase(Mid$(a$，7，6)&Right$(a$，12) A.VisualBASICProgramming B.QuickBasicProgramming C.QUICKBasicProgramming D.QuickBASICProgramming（分数：2.00）A.B.C.D.2.在窗体上画一个命令按钮，然后

2、编写如下代码：Private Sub Command1 Click()a&InputBox(“请输入第一个数“)b&=InputBox(“请输入第二个数“)Print b&+a&End Sub程序运行后，单击命令按钮，在两个输入对话框中先后输入 12345 和 54321，程序的输出结果是 A. 66666 B. 5432112345 C. 1234554321 D. 出错（分数：1.00）A.B.C.D.3.下列哪条语句是错的 _。 A. exit sub B. exit function C. exit while D. exit do（分数：1.00）A.B.C.D.4.以下关于图片框控

3、件的说法中，错误的是 A. 可以通过 Print 方法在图片框中输出文本 B. 清空图片框控件中图形的方法之一是加载一个空图形 C. 图片框控件可以作为容器使用 D. 用 Stretch 属性可以自动调整图片框中图形的大小（分数：2.00）A.B.C.D.5.假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i=1 To Len(s)s1=LCase(Mid(S,i,1)+s1Next iFun=s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Cl

4、ick()Dim Str1 As String, Str2 As StringStr1=InputBox(“请输入一个字符串“)Str2=Fun(Str1)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串 abcdefg，则单击“确定”按钮后在窗体上的输出结果为 A.ABCDEFG B.abcdefg C.GFEDCBA D.gfedcba（分数：2.00）A.B.C.D.6.决定一个窗体有无控制菜单的属性是_。 A. MinButtom B. Caption C. MaxButton D. ControlBox （分数：1.00）A.B.C.D.7.编

5、写如下事件过程：Private Sub Form_ MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)If Shift=6 And Button=2 ThenPrint “BBBB“End IfEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为_。 A. 同时按下 Shift 键和鼠标左键 B. 同时按下 Shift 键和鼠标右键 C. 同时按下 Ctrl、Alt 键和鼠标左键 D. 同时按下 Ctrl、Alt 键和鼠标右键（分数：2.00）A.B.C.D.8.下面数组说明语句正确的是_

6、。 A. Dim g(0，-5) As Single B. Dim h(100 To 100，100)As String C. Dim x(5)As Integer ReDim x(10)As Integer D. Dim yU /U ReDim y（分数：2.00）A.B.C.D.9.结构化程序所要求的基本结构不包括_。 A.顺序结构 B.GOTO 跳转 C.选择(分支)结构 D.重复(循环)结构（分数：1.00）A.B.C.D.10.在运行程序时，在文本框中输入新的内容，或在程序代码中改变 Text 的属性值，相应会触发到 A. GotFocus 事件 B. Click 事件 C. Cha

7、nge 事件 D. DblClick 事件（分数：2.00）A.B.C.D.11.设 a=“MicrosoftVisualBasic“，则以下使变量 b 的值为“VisualBasic”的语句是_。 A. b=Left(a, 10) B. b=Mid(a, 10) C. b=Right(a, 10) D. b=Mid(a, 11, 10)（分数：2.00）A.B.C.D.12.有关菜单的说法不恰当的是 A. 菜单与窗体无关，是对立的 B. 菜单总是于窗体有关，每个菜单都依附于一定的窗体 C. 菜单分为下拉式菜单和弹出式菜单 D. 在 Visual Basic 中有专门的设计菜单环境，那就是菜单

8、编辑器（分数：1.00）A.B.C.D.13.假定窗体的名称(Name 属性)为 Form1，则把窗体的标题设置为“等级考试“的语句为_。 A. Form1 = “等级考试“ B. Caption = “等级考试“ C. Form1.Text = “等级考试“ D. Form1.Name = “等级考试“（分数：2.00）A.B.C.D.14.以下数据结构属于非线性数据结构的是 _。 A. 队列 B. 线性表 C. 二叉树 D. 栈（分数：1.00）A.B.C.D.15.在窗体上画一个名称为 Command1 的命令按钮和三个名称分别为 Label1、Label2、Labet3 的标签，然后编

9、写如下代码：Private x AS IntegerPrivate Sub Command1_ClickU /UStatic y As IntegerDim 2 As Integern=10Z=n+2y=y+2X=X+2 Label1.Caption=xLabel2.Caption=yLabel3.Caption=zEnd Sub运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是 A.10 10 10 B.30 30 30 C.30 30 10 D.10 30 30（分数：1.00）A.B.C.D.16.设有如下通用过程：Public Sub Fun(a()，ByVal x As

10、Integer)For i=1 To 5x=x+a(i)NextEnd Sub在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程：Private Sub Command1_Click()Dim arr(5)As VariantFor i=1 To 5arr(i)= iNextn=10Call Fun(arr()，n)Text1.Text=nEnd Sub程序运行后，单击命令按钮，则在文本框中显示的内容是 _。 A. 10 B. 15 C. 25 D. 24（分数：1.00）A.B.C.D.17.如果准备读文件，打开随机文件“text.d

11、at”的正确语句是U /U。 A. Open“text.dat“For Write As #1 B. Open“text.dat“For Binary As #1 C. Open“text.dat“For Input As #1 D. Open“text.dat“For Random As #1（分数：2.00）A.B.C.D.18.在数据结构中，从逻辑上可以把数据结构分为 _。 A. 动态结构和静态结构 B. 紧凑结构和非紧凑结构 C. 线性结构和非线性结构 D. 内部结构和外部结构 （分数：1.00）A.B.C.D.19.在窗体上画一个名称为 Command1 的命令按钮，并编写如下程序：

12、Private Sub Command1_Click( )Dim x As IntegerStatic y As Integerx=10y=5Call f1(x，y)Print x，yEnd SubPrivate Sub f1(ByRef x1 As Integer，y1 As Integer)x1=x1+2y1=y1+2End Sub程序运行后，单击命令按钮，在窗体上显示的内容是 A.10 5 B.12 5 C.10 7 D.12 7（分数：1.00）A.B.C.D.20.窗体在屏幕上显示后有 _ 种方法可以清除它。 A. 1 B. 2 C. 3 D. 4（分数：1.00）A.B.C.D.2

13、1.能够产生 1 到 50 之间(含 1 和 50)随机整数的表达式是_。 A.Int(Rnd*51) B.Int(Rnd(50)+1) C.Int(Rnd*50) D.Int(Rnd*50+1)（分数：1.00）A.B.C.D.22.用于显示弹出式菜单的方法名是 A.ShowPOpupMenu B.ShowMenu C.ListPopupMenu D.PopupMenu（分数：2.50）A.B.C.D.23.下列程序段的执行结果为a=75If a60 Then I=1If a70 Then I=2If a80 Then I=3If aPrint “I=“；I A.I=1 B.I=2 C.I=

14、3 D.I=4 （分数：1.00）A.B.C.D.24.单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click( )Dim x As Integer，y As Integerx=50：y=78Call PPP(x，y)Print x；yEnd SubPublic Sub PPP(ByVM n As Integer，ByVal m As Integer) n=n/l0m=m/l0End Sub A.08 B.50 78 C.450 D.78 50（分数：1.00）A.B.C.D.25.以下叙述中错误的是U /U。 A.一个工程中可以包含多个窗体文件 B.在一个

15、窗体文件中用 Public 定义的通用过程不能被其他窗体调用 C.窗体和标准模块需要分别保存为不同类型的磁盘文件 D.用 Dim 定义的窗体层变量只能在该窗体中使用（分数：2.00）A.B.C.D.26.在窗体上有一个名称为 Check1 的复选框数组(含 4 个复选框)，还有一个名称为 Text1 的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的文字罗列在文本框中(见图)。下面能实现此功能的事件过程是U /U。（分数：2.00）A.B.C.D.27.软件测试的内容包括：、有效性测试 、集成测试 、验收测试 、系统测试 、单元测试正确的测试顺序是_。 A. 、 B

16、. 、 C. 、 D. 、（分数：1.00）A.B.C.D.28.以下叙述中错误的是 A. 在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B. 以.BAS 为扩展名的文件是标准模块文件 C. 窗体文件包含该窗体及其控件的属性 D. 一个工程中可以含有多个标准模块文件（分数：2.00）A.B.C.D.29.对长度为 n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为_。 A. log2n B. n/2 C. n D. n+l（分数：2.00）A.B.C.D.30.为了在按下 Esc 键时执行某个命令按钮的 Click 事件过程，需要把该命令按钮的一个属性设置为True，

17、这个属性是_。 A. Value B. Default C. Cancel D. Enablcd（分数：2.00）A.B.C.D.31.在运行程序时，在文本框中输入新的内容，或在程序代码中改变 Text 的属性值，相应会触发到U /U。 A. GotFocus 事件 B. Click 事件 C. Change 事件 D. DblClick 事件（分数：2.00）A.B.C.D.32.下列叙述中中正确的是U /U A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C.线性表的链式存储结构所需要的存储空间一般要少于顺序存

18、储结构 D.上述三种说法都不对（分数：2.00）A.B.C.D.33.下述关于数据库系统的叙述中正确的是 _。 A. 数据库系统减少了数据冗余 B. 数据库系缴晚了一切冗余 C. 数据库系统中数据的一致性是指数据类型的一致 D. 数据库系统比文件系统能管理更多的数据（分数：1.00）A.B.C.D.34.如果 A 为整数，且|A|=100，则打印“OK“，否则打印“Error“，表示这个条件的单行 格式 If 语句是U /U。 A.If int(A)=AAnd Sqr(A)=10ThenPrint“OK“ElsePrint“Error“ B.IF Fix(A)=AAndAbs(A)=100Th

19、en Print“OK“Else Print“Error“ C.IF Int(A)=AAnd(A=100,A=-100)ThenPrint“OK“ElsePrim“Error“ D.If Fix(A)=AAndA=100,AndA=-100ThenPrint“OK“ElsePrint“Error“（分数：2.00）A.B.C.D.35.下列描述中正确的是U /U。 A. 程序就是软件 B. 软件开发不受计算机系统的限制 C. 软件既是逻辑实体，又是物理实体 D. 软件是程序、数据和相关文档的集合（分数：2.00）A.B.C.D.二、B填空题/B(总题数：15，分数：26.00)36.下列程序段

20、的功能是：从文本框中输入一个数值，如果该数值满足“除以 4 余 1，除以 5 余 2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click() x=Val(Text1.Text) If_Then Print x Else _ Text1.Text=“ End If End Sub（分数：2.00）填空项 1:_37.结构化程序设计方法的主要原则可以概括为自顶向下、逐步求精、U U /U /U和限制使用 goto 语句。（分数：2.00）填空项 1:_38.阅读以下程序： Private Sub For

21、m_click() Dim k,n,m As integer n=10 m=1 k=1 Do While k=n m=m+2 k=k+1 Loop Print m End Sub 单击窗体程序的执行结果是U U /U/U。（分数：1.00）填空项 1:_39.数据字典是各类数据描述的集合，它通常包括 5 个部分，即数据项、数据结构、数据流、U U /U /U和处理过程。（分数：2.00）填空项 1:_40.面向对象的模型中，最基本的概念是对象和U U /U /U。（分数：1.00）填空项 1:_41.控件被拖动时显示的图标是由控件的 1 属性决定的。（分数：2.00）填空项 1:_42.设一棵

22、完全二叉树共有 500 个结点，则在该二叉树中有U U /U /U个叶子结点。（分数：1.00）填空项 1:_43.把窗体的 KeyPreview 属性设置为 True，并编写如下两个事件过程： Private Sub Form_ KeyDown(KeyCode As Integer，Shift As Integer) Print KeyCode； End Sub Private Sub Form_ KeyPress(KeyAscii As Integer) Print KeyAscii End Sub 程序运行后，如果按下 A 键，则在窗体上输出的数值为U U /U /U和U U /U /U

23、。（分数：4.00）填空项 1:_44.下列语句的输出结果是_。 Print Format$(1258.6，“000,000.00“)（分数：2.00）填空项 1:_45.下面程序的功能是统计字符串中“i”的个数，请填空。 Sub COU() Dim n As Integer a$=“Beijing University of Technology“ n=Len(a$) For i=1 To n b$=_ If b$=“i“ Then x=x+1 Next Print “x=“:x End Sub（分数：2.00）填空项 1:_46.数据库系统中实现各种数据管理功能的核心软件称为U U /U

24、/U。（分数：1.00）填空项 1:_47.在深度为 7 的满二叉树中，度为 2 的结点个数为U U /U /U。（分数：2.00）填空项 1:_48.在窗体上画一个名称为 Text1 的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为 Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。 （分数：1.00）填空项 1:_49.一般地，二叉树可以有 1 种基本形态，（分数：2.00）填空项 1:_50.在窗体上画个命令按钮，然后编写如程序： (假定变量 x 是一个窗体级变量) Dim x As Integer S

25、ub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x； End Sub 程序执行后，单击 Command1 命令按钮，输出的结果是U U /U/U。（分数：1.00）填空项 1:_二级 VISUAL+BASIC-4-1 答案解析(总分：80.50，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：54.50)1.执行以下程序段后，变量 c$的值为U /U。S$=“VisualBasicProgramming“b$=“Quick“c$=b$&UCase(Mid$

26、(a$，7，6)&Right$(a$，12) A.VisualBASICProgramming B.QuickBasicProgramming C.QUICKBasicProgramming D.QuickBASICProgramming（分数：2.00）A.B.C.D. 解析：2.在窗体上画一个命令按钮，然后编写如下代码：Private Sub Command1 Click()a&InputBox(“请输入第一个数“)b&=InputBox(“请输入第二个数“)Print b&+a&End Sub程序运行后，单击命令按钮，在两个输入对话框中先后输入 12345 和 54321，程序的输出结果

27、是 A. 66666 B. 5432112345 C. 1234554321 D. 出错（分数：1.00）A. B.C.D.解析：解析 程序的功能是执行了两个数的相加运算，故结果为 12345 和 54321 的和，即 A 项正确。3.下列哪条语句是错的 _。 A. exit sub B. exit function C. exit while D. exit do（分数：1.00）A.B.C. D.解析：解析 exit sub 用来跳出本过程。 exit function 用来跳出本函数并返回到调用处继续执行。 exit do 用来退出 do 循环。 没有 exit while 这个用法。4

28、.以下关于图片框控件的说法中，错误的是 A. 可以通过 Print 方法在图片框中输出文本 B. 清空图片框控件中图形的方法之一是加载一个空图形 C. 图片框控件可以作为容器使用 D. 用 Stretch 属性可以自动调整图片框中图形的大小（分数：2.00）A.B.C.D. 解析：解析 本题考查图片框与图像框的属性与方法。图片框中可以输出文本，与窗体类似，故答案 A是正确的。通过加载一个空图形 (Picture1.picture=LoadPicture(“ “)可以清空图片框，所以答案 B 的表述正确。图片框可以作为容器使用，即可以作为父控件，这也是图片框与图像框的主要区别之一。答案C 也是正

29、确的D 选项理解有误，Stretch 属性可以自动调整图形以适合图片框，而不是调整图形的大小关于 Stretch 属性，在 2002 年 9 月的试题中也出现过，它是图像框比较特殊的一个属性，图片框无此属性；考生应给予关注。5.假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i=1 To Len(s)s1=LCase(Mid(S,i,1)+s1Next iFun=s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim Str1 As

30、 String, Str2 As StringStr1=InputBox(“请输入一个字符串“)Str2=Fun(Str1)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串 abcdefg，则单击“确定”按钮后在窗体上的输出结果为 A.ABCDEFG B.abcdefg C.GFEDCBA D.gfedcba（分数：2.00）A.B.C.D. 解析：解析 题中函数 fun 的作用是将取来的字符串以小写字母的形式逆序排列组合成新的字符串，按钮的 Click 事件负责调用 fun 函数，所以本题的答案为 D。6.决定一个窗体有无控制菜单的属性是_。 A. M

31、inButtom B. Caption C. MaxButton D. ControlBox （分数：1.00）A.B.C.D. 解析：解析 ControlBox 属性：返回或设置一个值，说明运行时是否在窗体上显示控制菜单栏。 MinButtom 属性：决定窗体是否有最小化按钮，值为 True 或 False。 MaxButton 属性：决定窗体是否有最大化按钮，值为 True 或 False。 Caption 属性：返回或设置对象在标题栏中或图标下面的文本。7.编写如下事件过程：Private Sub Form_ MouseDown(Button As Integer，Shift As In

32、teger，X As Single，Y As Single)If Shift=6 And Button=2 ThenPrint “BBBB“End IfEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为_。 A. 同时按下 Shift 键和鼠标左键 B. 同时按下 Shift 键和鼠标右键 C. 同时按下 Ctrl、Alt 键和鼠标左键 D. 同时按下 Ctrl、Alt 键和鼠标右键（分数：2.00）A.B.C.D. 解析：解析 在鼠标的 Mouse_ Down 事件中，当按下左键时，Button=1，右键时 Button=2，在键盘上按下 Shift 键时，Shift 值

33、为 1，Ctrl 键时，Shift 值为 2，Alt 时，Shift 值为 4，如果同时按下多键，则它们的值也相加。8.下面数组说明语句正确的是_。 A. Dim g(0，-5) As Single B. Dim h(100 To 100，100)As String C. Dim x(5)As Integer ReDim x(10)As Integer D. Dim yU /U ReDim y（分数：2.00）A.B. C.D.解析：解析 选项 A 不为 0 时不能这样定义，要用关键字 To 显式地指明下标范围；选项 B 二维数组 h 的数组元素个数是 101，类型是字符串型；选项 C 可调数

34、组的说明应不带下标参数，x(5)应改成 x( )就对了；选项 D 重定义语句。ReDim 应带下标参数。9.结构化程序所要求的基本结构不包括_。 A.顺序结构 B.GOTO 跳转 C.选择(分支)结构 D.重复(循环)结构（分数：1.00）A.B. C.D.解析：解析 1966 年 Boehm 和 Jacopini 证明了程序没汁语言仅仅使用顺序、选择和重复三种节本控制结构就足以表达出各种其他形式结构的程序没计方法。10.在运行程序时，在文本框中输入新的内容，或在程序代码中改变 Text 的属性值，相应会触发到 A. GotFocus 事件 B. Click 事件 C. Change 事件 D

35、. DblClick 事件（分数：2.00）A.B.C. D.解析：解析 文本框 Change 事件在用户改变正文或通过代码改变 Text 属性的设置时发生。11.设 a=“MicrosoftVisualBasic“，则以下使变量 b 的值为“VisualBasic”的语句是_。 A. b=Left(a, 10) B. b=Mid(a, 10) C. b=Right(a, 10) D. b=Mid(a, 11, 10)（分数：2.00）A.B. C.D.解析：解析 Mid()函数返回字符串中指定数量的字符，其格式为： Mid(字符串，位置，长度) 如果略去了“长度”，函数将返回从“字符串”的左

36、边“位置”开始右边的字符。在“MicrosoftVisualBasic”中“V”在左边的第 10 位置，从“V”开始右边的字符为“VisualBasic”。12.有关菜单的说法不恰当的是 A. 菜单与窗体无关，是对立的 B. 菜单总是于窗体有关，每个菜单都依附于一定的窗体 C. 菜单分为下拉式菜单和弹出式菜单 D. 在 Visual Basic 中有专门的设计菜单环境，那就是菜单编辑器（分数：1.00）A. B.C.D.解析：解析：此题考核的是有关菜单的基础知识。菜单分为下拉式菜单和弹出式菜单两种。要打开某界面上的菜单，首先要进入该界面 ，此处界面上指窗体，所以菜单总与窗体相关联。Visual

37、 Basic 中有专门的设计菜单环境，那就是菜单编辑器，可以用菜单编辑器设计用户需 要的菜单，方便用户的操作。13.假定窗体的名称(Name 属性)为 Form1，则把窗体的标题设置为“等级考试“的语句为_。 A. Form1 = “等级考试“ B. Caption = “等级考试“ C. Form1.Text = “等级考试“ D. Form1.Name = “等级考试“（分数：2.00）A.B. C.D.解析：14.以下数据结构属于非线性数据结构的是 _。 A. 队列 B. 线性表 C. 二叉树 D. 栈（分数：1.00）A.B.C. D.解析：解析 线性表、栈和队列等数据结构所表达和处理

38、的数据以线性结构为组织形式。栈是一种特殊的线性表，这种线性表只能在固定的一端进行插入和删除操作，允许插入和删除的一端称为栈顶，另一端称为栈底。一个新元素只能从栈顶一端进入，删除时，只能删除栈顶的元素，即刚刚被插入的元素。所以栈又称后进先出表(Last In First Out)；队列可看作是插入在一端进行，删除在另一端进行的线性表，允许插入的一端称为队尾，允许删除的一端称为队头。在队列中，只能删除队头元素，队列的最后一个元素一定是最新入队的元素。因此队列又称先进先出表(First In First Out)。15.在窗体上画一个名称为 Command1 的命令按钮和三个名称分别为 Label1

39、、Label2、Labet3 的标签，然后编写如下代码：Private x AS IntegerPrivate Sub Command1_ClickU /UStatic y As IntegerDim 2 As Integern=10Z=n+2y=y+2X=X+2 Label1.Caption=xLabel2.Caption=yLabel3.Caption=zEnd Sub运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是 A.10 10 10 B.30 30 30 C.30 30 10 D.10 30 30（分数：1.00）A.B.C. D.解析：解析 Private 定义的变量

40、 x 为模块级变量，每单击一次 Command1，x 将在原来的基础上被赋予新值。而 y、z 为过程变量，y 由于以 Static 定义，具有存储数值的功能， 为静态变量；而 z 为动态变量，每调用一次该事件过程，z 值都会自动初始化。16.设有如下通用过程：Public Sub Fun(a()，ByVal x As Integer)For i=1 To 5x=x+a(i)NextEnd Sub在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程：Private Sub Command1_Click()Dim arr(5)As Varia

41、ntFor i=1 To 5arr(i)= iNextn=10Call Fun(arr()，n)Text1.Text=nEnd Sub程序运行后，单击命令按钮，则在文本框中显示的内容是 _。 A. 10 B. 15 C. 25 D. 24（分数：1.00）A. B.C.D.解析：解析 Fun 函数的参数 x 为传值调用。在函数中，对 x 值的改变不能够返回给 n，因此最后 n 的值仍然为 10，没有改变。故应选择 A。17.如果准备读文件，打开随机文件“text.dat”的正确语句是U /U。 A. Open“text.dat“For Write As #1 B. Open“text.dat“

42、For Binary As #1 C. Open“text.dat“For Input As #1 D. Open“text.dat“For Random As #1（分数：2.00）A.B.C.D. 解析：解析 准备读文件则应该以 Random 方式打开文件，即以随机存取方式打开文件。18.在数据结构中，从逻辑上可以把数据结构分为 _。 A. 动态结构和静态结构 B. 紧凑结构和非紧凑结构 C. 线性结构和非线性结构 D. 内部结构和外部结构 （分数：1.00）A.B.C. D.解析：解析 逻辑结构反映数据元素之间的逻辑关系，线性结构表示数据元素之间一对一的关系，非线性结构表示数据元素之间一

43、对多或多对一的关系。线性结构和非线性结构是根据数据元素之间关系的不同特性加以分类的，即是从逻辑上加以分类的。19.在窗体上画一个名称为 Command1 的命令按钮，并编写如下程序：Private Sub Command1_Click( )Dim x As IntegerStatic y As Integerx=10y=5Call f1(x，y)Print x，yEnd SubPrivate Sub f1(ByRef x1 As Integer，y1 As Integer)x1=x1+2y1=y1+2End Sub程序运行后，单击命令按钮，在窗体上显示的内容是 A.10 5 B.12 5 C.

44、10 7 D.12 7（分数：1.00）A.B.C.D. 解析：解析：题干中 y 定义为静态函数，再观察过程 f1 中 x1 是传值方式传送， y1 是传址方式传送，单击命令按钮后，x 和 y 分别赋初值为 10 和 5，接着调用 f1 过程，x 和 y 分别加 2，正确结果为选项 D)。20.窗体在屏幕上显示后有 _ 种方法可以清除它。 A. 1 B. 2 C. 3 D. 4（分数：1.00）A.B.C. D.解析：解析 清除窗体的方法可以用 Unload 将其从内存中彻底卸载，也可以设置其 Visible 属性为False，仅仅使其从屏幕上消失；还可以用Hide 属性，使窗体隐藏起来。21

45、.能够产生 1 到 50 之间(含 1 和 50)随机整数的表达式是_。 A.Int(Rnd*51) B.Int(Rnd(50)+1) C.Int(Rnd*50) D.Int(Rnd*50+1)（分数：1.00）A.B.C.D. 解析：解析 Rnd 函数产生 01 之间的随机数，不包括 0 和 1。要产生 150(包含 1 和 50)之间的随机整数，可以先产生 050 之间的随机整数，然后再这个基础上加 1。放 D 选项正确。22.用于显示弹出式菜单的方法名是 A.ShowPOpupMenu B.ShowMenu C.ListPopupMenu D.PopupMenu（分数：2.50）A.B.C.D. 解析：解析 弹出式菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。弹出式菜单在窗体内的显示位置取决于单击鼠标键时指针的位置。要显示弹出式菜单，必须调用 PopupMenu 方法。23.下列程序段的执行结果为a=75If a60 Then I=1If a70 Then I=2If a80 Then I=3If aPrint “I=“；I A.I=1 B.I=2 C.I=3 D.I=4