下载文档原格式
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行，目前处于紧张的备考阶段，以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后，VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中，VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中，要将一个窗体装载到内存进行变量初始化等预处理，但没有显示该窗体，应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段：a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
计算机二级vb
计算机二级VB是一项计算机技能认证考试，可以衡量一个人对VB编程语言的理解和应用能力。
VB是一种面向对象的编程语言，在Windows操作系统中广泛应用于开发各种类型的应用程序，如各种办公软件、游戏和数据库管理工具等。
本文将介绍计算机二级VB考试的一些基本知识和准备要求。
首先，参加计算机二级VB考试需要具备一定的计算机基础知识，如Windows操作系统、Office软件应用等。
同时也需要掌握VB语言的基本语法，如变量、数据类型、运算符、流控制结构、函数和子程序等。
在实际应用中，还需要学会使用VB编写各种窗体、标准控件和自定义控件，并掌握控件属性和方法的使用方法。
其次，考生需要熟悉VB语言的对象模型，例如常用的窗体、文本框、按钮、下拉框、列表框等控件，以及常用的文件和数据库操作对象等。
同时，还需要了解VB的事件模型，如按钮点击事件、窗体打开和关闭事件等。
最后，为了顺利通过计算机二级VB考试，考生需要通过大量的练习和实践来掌握VB编程技能。
可以参考一些优秀的VB编程教程和实战项目，逐步提高自己的编程水平。
总之，计算机二级VB考试需要考生具备一定的计算机基础知识和VB编程技能，通过学习、练习和实践，可以逐步提高自己的VB编程水平，最终成功通过考试。
所有单选题1、在VB的工程中，工程文件的扩展名是______。
A：frmB：vbgC：vbpD：bas答案：C等级：1 难度：1知识点：VB知识点/VB的工程管理和环境设置2、在VB的应用程序中，窗体文件的扩展名是______。
A：frmB：vbgC：vbpD：bas答案：A等级：1 难度：1知识点：VB知识点/VB的工程管理和环境设置3、在VB的应用程序中，标准模块文件的扩展名是______。
A：frmB：vbgC：vbpD：bas答案：D等级：1 难度：1知识点：VB知识点/VB的工程管理和环境设置4、以下关于保存工程的说法正确的是______。
A：保存工程时只保存窗体文件即可B：保存工程时只保存工程文件即可C：先保存窗体文件，再保存工程文件D：先保存工程文件，再保存窗体文件答案：C等级：1 难度：15、在面向对象的程序设计中，最基本的元素是______。
A：窗体文件B：工程文件C：属性D：对象答案：D等级：1 难度：1知识点：VB知识点/VB的编程环境6、在运行程序时，若要使文本框获得输入焦点，可调用文本框对象的______方法来实现。
A：RefreshB：GetFocusC：SetFocusD：Tab答案：C等级：2 难度：2知识点：VB知识点/简单控件设计7、在程序运行时，若要获得用户在文本框中所选择的文本，可通过访问______属性来实现。
A：SelStartB：SelLengthC：TextD：SelText答案：D等级：2 难度：2知识点：VB知识点/简单控件设计8、若要设置文本框最大可接收的字符数，可通过______属性来实现。
A：MultiLineB：LengthC：MaxD：MaxLength知识点：VB知识点/简单控件设计9、窗体的标题条显示内容由窗体对象的______属性决定。
A：BackColorB：BackStyleC：TextD：Caption答案：D等级：1 难度：1知识点：VB知识点/简单控件设计10、若要取消窗体的最大化功能，则可设置______属性为False来实现。
福建二级vb考试试题及答案福建二级VB考试试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个选项是正确的字符串连接运算符？A. +B. ||C. &D. *答案：C2. 下列哪个函数用于获取当前日期？A. Date()B. Now()C. Time()D. Day()答案：A3. Visual Basic中，哪个关键字用于声明一个变量？A. DimB. FunctionC. SubD. Const答案：A4. 在Visual Basic中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D5. 在Visual Basic中，如何声明一个整型变量？A. Dim a As IntegerB. Integer aC. a = IntegerD. a Integer答案：A6. Visual Basic中，哪个控件用于显示文本，但用户不能编辑？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A7. 在Visual Basic中，哪个事件用于处理按钮点击？A. ClickB. DoubleClickC. MouseDownD. KeyPress答案：A8. Visual Basic中，哪个函数用于将字符串转换为数字？A. Str()B. Val()C. CStr()D. CDbl()答案：B9. 在Visual Basic中，哪个关键字用于结束当前过程？A. EndB. ExitC. ReturnD. Stop答案：A10. Visual Basic中，哪个控件允许用户从预定义的列表中选择一个或多个项目？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个数组。
浙江计算机二级vb考试试题及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 在VB中，以下哪个选项不是控制结构？A. If...Then...ElseB. For...NextC. While...WendD. Function答案：D3. 以下哪个选项是VB中合法的变量名？A. 2variableB. variable2C. $variableD. variable$答案：B4. VB中，以下哪个函数用于计算一个数的绝对值？A. AbsB. SqrC. RoundD. Int5. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arr(5)B. Dim arr(5) As IntegerC. Dim arr(5) As StringD. Both B and C答案：D6. VB中，以下哪个选项是正确的子程序声明？A. Sub MySub()B. Function MySub()C. Both A and BD. None of the above答案：C7. 在VB中，以下哪个选项是正确的事件处理程序的声明方式？A. Private Sub Form_Click()B. Public Sub Form_Click()C. Both A and BD. None of the above答案：A8. VB中，以下哪个选项是正确的窗体属性？A. CaptionB. TextC. Both A and BD. None of the above答案：C9. 在VB中，以下哪个选项是正确的控件事件？B. DoubleClickC. Both A and BD. None of the above答案：C10. VB中，以下哪个选项是正确的文件访问模式？A. Open For InputB. Open For OutputC. Both A and BD. None of the above答案：C二、填空题（每空2分，共20分）1. VB中，使用________函数可以将字符串转换为小写。
计算机等级考试二级vb大纲计算机等级考试二级VB（Visual Basic）大纲是针对计算机编程语言Visual Basic的考试标准，它涵盖了VB编程的基础知识和应用技能。
以下是计算机等级考试二级VB的大纲内容：# 一、VB编程基础1. VB语言概述- VB的发展历史- VB的特点与应用领域2. VB开发环境- VB集成开发环境（IDE）的介绍- 项目和解决方案的概念3. VB语法基础- 基本数据类型- 变量和常量- 运算符和表达式4. 控制结构- 顺序结构- 分支结构（If...Then...Else, Select Case）- 循环结构（For...Next, While...Wend, Do...Loop）# 二、VB程序设计1. 过程与函数- Sub过程的定义与调用- Function函数的定义与调用- 参数传递2. 数组- 一维数组与多维数组- 数组的声明与使用3. 字符串处理- 字符串的基本概念- 字符串函数（如Len, Mid, Left, Right等）4. 集合与字典- 集合的基本概念- 字典的创建与使用# 三、VB界面设计1. 窗体- 窗体的属性、方法和事件- 窗体的布局与设计2. 控件- 标准控件（如Label, TextBox, Button等）- 列表控件（如ListBox, ComboBox等）- 容器控件（如Panel, Frame等）3. 菜单与工具栏- 菜单的创建与事件处理- 工具栏的设计4. 对话框- 标准对话框（如Open, Save, Print等）- 自定义对话框的设计# 四、VB高级编程1. 文件操作- 文件的打开、读取、写入和关闭- 文件系统操作（如目录操作）2. 数据库访问- 数据库的基本概念- ADO（ActiveX Data Objects）的使用- 数据绑定控件3. 错误处理- 错误处理机制- Try...Catch...Finally结构4. 多线程编程- 线程的基本概念- 线程的创建与控制# 五、VB项目实践1. 项目需求分析- 需求收集与分析- 项目规划与设计2. 项目开发流程- 编码规范- 版本控制3. 项目测试- 单元测试- 集成测试4. 项目部署与维护- 部署策略- 维护与升级# 六、VB考试要求1. 考试内容- 理论知识测试- 编程实践测试2. 考试形式- 笔试- 上机操作3. 考试标准- 考试时间- 评分标准4. 考试准备- 学习资料- 模拟考试计算机等级考试二级VB大纲为考生提供了一个全面的学习框架，帮助考生系统地掌握VB编程的基础知识和应用技能，为通过考试打下坚实的基础。
第19次四川省等级考试题第二部分Visual Basic语言程序设计注：本word文档在下课前完成并上交服务器，答题过程中禁止使用vb编程环境；(共95分)一、单项选择题(每小题2分，共20分)1．在V isualBasic中，窗体文件的扩展名为( C )。
(A)EXE (B)BAS (C)FRM (D)VBP2．表达式8+2*3^2＼9／8-3mod2的结果是( A)。
(A)25 (B)24 (C)7 (D)7．253．从键盘上输入两个字符串，分别保存在变量str1，str2中。
确定第二各字符串在第一个字符串中起始位置的函数是（ D ）(A)Left (B)Mid (C)String (D)Instr4．若x是一个正实数，能对x的第3位小数进行四舍五人的表达式是( B )。
(A)0.01*Int(100*(x+0.05)) (B)0.01*Int(100*(x+0.005))(C)0.01*Int(x+0.05) (D)0.01*lnt(x+0.005)5.下面四个语句中,能打印显示20*30字样的是( A)(A)Print″20*30″（B）Print20*30（C）PrintChr（20）+″*″+Chr（30）（D）Print V al（″20″）*V al（″20″）6．变量在窗体模块中声明为公共的。
下列关于变量的陈述哪条是正确的? ( A)(A)可以从项目的任何模块中存取变量(B)可以在窗体的任何地方存取变量，而不是在窗体模块外。
(C)只有在同一个项目的其他窗体模块中存取变量。
(D)变量不能在窗体模块中声明为公共的。
7．对一个窗体对象，其最先发生的事件是( C )事件。
(A)Click (B)DblClick (C)Load (D)UnLoad8. 以下能够触发文本框Change事件的操作是( D )。
(A)文本框失去焦点(B)文本框获得焦点(C)设置文本框的焦点(D)改变文本框的内容9.若要使标签控件显示时覆盖其背景内容，要设置其BackStyle属性的值为( B )(A)0 (B)1 (C)2 (D)310．下面对控件数组叙述的正确的是( B )。
全国计算机vb二级考试内容计算机VB二级考试内容一、Visual Basic 程序开发环境1. Visual Basic 的特点和版本。
2. Visual Basic 的启动与退出。
3. 主窗口:(1) 标题和菜单。
(2) 工具栏。
4. 其他窗口:(1) 窗体设计器和工程资源管理器。
(2) 属性窗口和工具箱窗口。
二、对象及其操作1. 对象:(1) Visual Basic 的对象。
二级各科目考试的公共基础知识考试大纲及样题见高等教育出版社出版的《全国计算机等级考试二级教程———公共基础知识(2013 年版)》附录部分。
(2) 对象属性设置。
2. 窗体:(1) 窗体的结构与属性。
(2) 窗体事件。
3. 控件:(1) 标准控件。
(2) 控件的命名和控件值。
4. 控件的画法和基本操作。
5. 事件驱动。
三、数据类型及其运算1. 数据类型:(1) 基本数据类型。
(2) 用户定义的数据类型。
2. 常量和变量:(1) 局部变量与全局变量。
(2) 变体类型变量。
(3) 缺省声明。
3. 常用内部函数。
4. 运算符与表达式:(1) 算术运算符。
(2) 关系运算符与逻辑运算符。
(3) 表达式的执行顺序。
四、数据输入、输出1. 数据输出:(1) Print 方法。
(2) 与Print 方法有关的函数(Tab,Spc,Space$)。
(3) 格式输出(Format$)。
2. InputBox 函数。
3. MsgBox 函数和MsgBox 语句。
4. 字形。
5. 打印机输出:(1) 直接输出。
(2) 窗体输出。
五、常用标准控件1. 文本控件:(1) 标签。
(2) 文本框。
2. 图形控件:(1) 图片框,图像框的属性,事件和方法。
(2) 图形文件的装入。
(3) 直线和形状。
3. 按钮控件。
4. 选择控件:复选框和单选按钮。
5. 选择控件:列表框和组合框。
6. 滚动条。
7. 计时器。
8. 框架。
9. 焦点与Tab 顺序。
六、控制结构1. 选择结构:(1) 单行结构条件语句。
国家二级计算机vb考试试题及答案一、单项选择题（每题1分，共10分）1. 在VB中，用于定义变量的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项不是VB中的控制结构？（）A. 顺序结构B. 选择结构C. 循环结构D. 函数结构答案：D3. VB中，用于声明一个子程序的关键字是（）。
A. FunctionB. SubC. DimD. Const答案：B4. 在VB中，用于表示逻辑“与”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：A5. VB中，用于表示逻辑“或”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：B6. 在VB中，用于声明一个数组的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：A7. VB中，用于声明一个常量的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：D8. 在VB中，用于表示逻辑“非”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：C9. VB中，用于声明一个函数的关键字是（）。
A. FunctionB. SubC. DimD. Const答案：A10. 在VB中，用于表示逻辑“异或”运算符的是（）。
A. AndB. OrC. NotD. Xor答案：D二、填空题（每题2分，共10分）1. 在VB中，使用____关键字可以定义一个全局变量。
答案：Public2. 当需要在VB中定义一个私有变量时，应使用____关键字。
答案：Private3. 在VB中，使用____关键字可以定义一个局部变量。
答案：Dim4. VB中，使用____关键字可以定义一个过程。
答案：Sub5. VB中，使用____关键字可以定义一个函数。
答案：Function三、简答题（每题5分，共20分）1. 请简述VB中事件驱动编程的概念。
四川省普通高等学校计算机应用知识和能力第十九次等级考试二级（Visual Basic）笔试试卷第一部分软件技术基础(共15分)一、判断是非（1分/小题，共10分）1、数组是一种固定长度的线性表，可以对数组进行插入和删除运算2、白盒测试时，测试者不考虑程序的内部结构特征3、对线性表中的数据进行二分查找，必须要求数据元素有限且有序4、内存管理技术中，每个分区的地址是连续的5、文件的目录结构是一种线性表6、面向对象的程序设计中，对象的动作取决于发送给该对象的消息7、虚拟设备是指将大容量的共享设备的一部分空间用来代替实际的独占设备8、在结构化程序设计中，N-S图是用于详细设计的工具之一9、在操作系统的设备管理中，打印机被看成是一种共享设备10、分时操作系统的主要特征之一是提高计算机系统的实时性二、单项选择题（1分/小题，共5分）1、在排序法中，从未排序序列中依次取出元素，与已排序列中的元素做比较，将其放入已经排序序列的正确位置称为（）A）选择排序B）快速排序C）插入排序D）冒泡排序2、有X、Y、Z三个元素依次入栈，不可能的出栈的顺序是（）A）Z、Y、X B）Z、X 、Y C）Y、X、Z D）X、Y、Z3、进程的状态是可以转换的，而以下哪个状态转换是不可能的( )A）就绪状态——>执行状态B）执行状态——>就绪状态C）阻塞状态——>就绪状态D）等待状态——>执行状态4、线性链表的地址（）A）必须连续B）部分地址必须连续C）一定不连续D）连续与否都可以5、在软件测试中，（）主要分析程序的内部结构。
A）白盒法B）黑盒法C）因果图法D）错误推测法第二部分Visual Basic语言程序设计一、单项选择题（1分/题，共10分）1、在Visual Basic中，窗体文件的扩展名为（）A）EXE B）BAS C）FRM D）VBP2、表达式8+2*3^2\9/8-3 mod 2的结果为（）A）25 B）24 C）7 D）7.253、从键盘上输入两个字符串，分别保存到变量Str1和Str2中，确定第二个字符串在第一个字符串中起始位置的函数是（）A）Left B）Mid C）String D）Instr4、若X是一个正实数，能对X的第3位小数进行四舍五入的表达式是（）A）0.01*Int(100*(x+0.05)) B）0.01*Int(100*(x+0.005))C）0.01*Int(x+0.05) D）0.01*Int(x+0.005)5、下面四个语句中能打印显示20*30字样的是（）A）pint “20*30”B）print 20*30C）print chr(20)+”*”+chr(30)D）D）print Val(“20”*Val(“30”)6、变量在窗体模块中申明为公共的，下列关于变量的陈述哪条是正确的（）A）可以从项目的任何打模块中存取变量B）可以在窗体的任何地方存取变量，而不是在窗体模块外C）只能在同一个项目的其它窗体模块中存取变量D）变量不能在窗体模块中申明为公共的7、对一个窗体对象，其最先发生的事件是（）A）Click B）DbClick C）Load D）UnLoad8、以下能触发文本框Change事件的操作是（）A）文本框失去焦点B）文本框获得焦点C）设置文本框的焦点D）改变文本框的内容9、若要使标签控件显示时覆盖其背景内容，要设置其BackStyle属性的值为（）A）0 B）1 C）2 D）310、下面对控件数组叙述正确的是（）A）在窗体上添加第二个相同类型的空间时，VB不会提示创建一个空间数组B）控件数组使用Index属性来标识下标，其范围从0开始C）控件数组使用的资源比用几个单独同样的控件占用的更多D）如果有一个按钮叔祖，按任一按钮不会调用相同的Click事件过程二、阅读分析程序（3分/题，共45分）1、阅读下面的程序Option ExplicitDim n As Integer, L As Integer, I As Integer, J As IntegerDim a() As Integern = InputBox("请输入一个整数")ReDim a(1 To n)a(1) = 1: a(2) = 2: a(3) = 3: L = 4L1: For I = 5 To nFor J = 2 To L - 1If I Mod a(J) = 0 ThenExit ForEnd IfL2: Next JL3: If J > L - 1 Then a(L) = I: L = L + 1Next IL4: For I = 1 To L - 1Print a(I);Next IL = L - 1Print " L="; LEnd Sub（1）程序运行后点击“Command1”，如果在输入框输入20，输出的结果为（）A）1，2，3，5，7，11，13，17，19，L=9B）1，3，5，7，9，11，13，15，17，L=19C）1，2，3，4，5，……..18，19，L=19D）1，2，3，4，5，……..18，19，20，L=20（2）上述程序中语句“Dim a( ) as Integer”的功能是（）A）定义a是11个元素的整形数组B）定义一个动态数组C）定义了一个静态数组D）定义了a个整形变量（3）当执行语句“Exit For”后，程序流程将( )继续执行A）从语句标号L1处B）从语句标号L2处C）从语句标号L3处D）从语句标号L4处2、阅读下面的程序Option ExplicitPrivate Sub Command1_Click()Dim StrPassWord As StringDim I As IntegerFor I = 1 To 3StrPassWord = InputBox("Password")If StrPassWord = "123" ThenLLL: Exit ForEnd IfNext IIf I = 4 ThenMsgBox "你不是合法用户"ElseMsgBox "欢迎你"End IfEnd Sub（1）该程序的作用是（）A）用户输入3次正确口令”123”，才显示“欢迎你”，输入3次错误口令才显示“你不是合法用户”B）用户输入1次正确口令”123”，才显示“欢迎你”，输入1次错误口令才显示“你不是合法用户“C）用户输入1次正确口令”123”，才显示“欢迎你”，输入3次错误口令才显示“你不是合法用户“D）用户输入1次出错口令”123”，才显示“欢迎你”，输入3次正确口令才显示“你不是合法用户“（2）如果将LLL处的语句去掉，则（）A）和原来的程序效果一样B）用户必须输入3次正确口令后，才会显示“欢迎你“C）用户必须输入3次口令，且输入任何口令都显示“欢迎你“D）用户必须输入3次口令，且输入任何口令都显示“你不是合法用户“3、阅读下面的程序Private Sub Form_Click()Dim a(2, 4) As Integer, b(4) As IntegerDim i As Integer, J As IntegerDo While i <= 4a(1, i) = a(1, i) + 2 * i - 1a(2, i) = a(2, i) + 12 - 2 * ii = i + 1LoopFor i = 1 To 2For J = 1 To 4Print a(i, J);Next JPrintNext IL1: i = 0Do While i <= 4b(i) = a(1, i) + a(2, 4 - i)Text1.Text = b(i)i = i + 1LoopEnd Sub（1）程序执行到L1语句处输出的结果为（）A）1 3 5 7 B）7 5 3 110 8 6 4 10 8 6 4C）10 8 6 4 D）4 6 8 107 5 3 1 1 3 5 7（2）本段程序执行完成后，数组元素b(2)的值为（）A）3 B）7 C）11 D）15（3）本段程序执行完成后，显示在文本框中的结果是（）A）19 17 15 11 B）19 C）15 D）34、在窗体上设计有文本框TxtInput和按钮cmdTest，且TxtInput.Text=”Visual basic is easy“，并有如下代码：Option ExplicitOption Base 1Private Sub cmdTest_Click()Dim strS$, i%, j%, n%, stra$, strb$, count%, t$, strt$()strS = TxtInputn = Len(strS)ReDim strt(n)For i = 1 To nstra = Mid(strS, i, 1)strb = Mid(strS, i + 1, 1)If strb = "s" ThenIf stra >= "a" And stra <= "z" Thencount = count + 1strt(count) = stra + strbEnd IfEnd IfNext iFor i = 1 To countFor j = 1 To count - iIf strt(j) < strt(j + 1) Thent = strt(j): strt(j) = strt(j + 1): strt(j + 1) = tEnd IfNext jNext iFor i = 1 To countPrint strt(i)Next iText1.Text = countEnd Sub（1）程序运行后，count的值应为（）A）0 B）2 C）4 D）6（2）程序运行后，窗体上显示的结果为（）A）basic Visual wasy is B）is is as asC）is as is as D）as as is is（3）Option Explicit的作用是（）A）表明此模块内部变量必须先声明后使用B）表明此模块没有通用过程C）表明此模块的通用过程不能被其他模块调用D）表明此模块变量不声明可以直接使用（3）以下关于语句“Option Base 1”正确的说法是（）A）其功能是知道指定数组的默认上界B）其功能是知道指定数组的默认下界C）其功能是定义动态数组D）其功能是定义静态数组5、阅读下面的程序Option ExplicitOption Base 1Private Type AbcA As IntegerEnd TypePrivate Sub Form_Click()Dim recAbc As AbcDim arrA(4, 4) As IntegerDim intI As Integer, intJ As Integer, intN As IntegerOpen "abc.txt" For Random As #1For intI = 1 To 4For intJ = 1 To 4intN = intN + 1recAbc.A = intNPut #1, , recAbcNext intJNext intICloseOpen "abc.txt" For Random As #1For intJ = 1 To 4For intI = 1 To 4Get #1, intI * intJ, recAbcarrA(intI, intJ) = recAbc.ANext intINext intJText1.Text = arrA(3, 2)CloseFor intI = 1 To 4For intJ = 1 To 4Print Tab(intJ * 3); Format(arrA(intI, intJ), "###");Next intJNext intIEnd Sub（1）程序中的“abc.txt”文件在第一次打开时是按（）方式打开的A）顺序文件读B）顺序文件写C）随机文件D）二进制文件（2）数组arrA完成赋值以后，数组元素arrA(3,2)的值为（）A）1 B）7 C）6 D）4（3）程序运行后在窗体上输出的结果为（）A）1 2 3 4 B）1 2 3 45 6 7 8 2 4 6 89 10 11 12 3 6 9 1213 14 15 16 4 8 12 16C）1 5 9 13 D）1 2 3 42 6 10 14 234 53 7 11 15 345 64 8 12 16 456 7三、程序填空题（2分/空，共30分）1、下面函数的功能是：求变量s（s=a+aa+aaa+aaaa+….）的值，其中，a为一个0~9的数字，总共累积a项，例如：当a=3时，s=3+33+333 （共累积3项）当a=5时，s=5+55+555+5555+55555（共累积5项）请完善程序：Public Function calc(a As Double)s = at = aFor i = 2 To ①t = ②s = s + tNext iPrint sEnd Function2、下面程序是用“冒泡”法将数组a中的10个整数按升序排序，并将排好序的结果显示在文本框中，请完善程序。
