7-9章VB理论
第7章VB过程和参数传递
VB程序设计教程
沈美莉 马银晓 陈孟建 编著
10
Function过程 第二节 Function过程
二、调用Function过程 调用 过程
Function过程的调用比较简单，可以象一个函数一样调用，其调用格式为： <过程名> = （[<实参表列>]） 【例题5.16】 编写一个求最大公约数（GCD）的函数过程，并调用该函数。 【程序代码】 （1）创建GCD函数 Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer Dim reminder As Integer Do While y <> 0 reminder = x Mod y x = y y = reminder Loop gcd = x End Function
VB程序设计教程
沈美莉 马银晓 陈孟建 编著
5
Sub过程 第一节 Sub过程
二、调用sub过程 调用 过程 调用Sub过程有两种方法，一种方法是使用Call调用过程语句来调 用过程，另一种方法是将过程名作为一个语句来使用。 call调用语句 1．用call调用语句 （1）格式 Call 过程名 [（<实参表>）] （2）功能 Call语句把程序控制传递到一个Visual Basic语言的Sub过程。 Call语句调用一个过程时，如果过程本身没有参数，则<实参表> 和括号可以省略；否则，应给出相应的实际参数，并把参数放在 括号中。实际参数是传递给sub过程的变量或常数的。 例如： Call ppa(a,b)
VB程序设计教程
沈美莉 马银晓 陈孟建 编著
18
第三节 参数的传递
例如： Function fac(a,b) …… …… fac = fa End Function 调用fac函数时，可以使用以下语句来完成： Private Sub Command1_Click() …… …… Call fac(x,y) End sub 以上程序中的a和b是两个形式参数，而 x和y是两个实际参数。这样就完成了形参 与实参的结合，其关系如下图所示。
VB第7章 过程
【例7-3】编写一个利用三角形三条边的长度求 三角形面积的函数
Area= c(c-x)(c-y)(c-z) c=(x+y+z)/2
2. Function过程的调用
(1)
像使用VB内部函数一样，只需写出函数名和相应的参数 s = Max(a, b) Print Max(s, c)
(2)用Call语句调用
例7.2
计算1!+2!+3!+…+10!
因为计算5!和10!都要用到阶乘n! (n!＝1×2×3×…×n) 所以把计算n!编成Sub过程 程序代码： Private Sub Form_Click() 若实参要获得子过程的返回值, Dim y As Long, sum As Long 则实参只能是变量. Dim i as Integer for i=1 to 10 Call Jc(i, y) Private Sub Jc(byval n As Integer, t As Long) sum=sum+y Dim i As Integer Next i t=1 Print sum For i = 1 To n End Sub t=t*i Next i End Sub
把以上三个方面分析好之后，就可以编写一个递归程序。 其一般格式为：
if（边界条件） 赋予边界值 else 调用解决问题的通式
例7.11
采用递归方法求n!
(n>0)
可用下列的递归公式
1 n! = n×(n-1)!
n=1 n>1
本递归中，终止条件是n=1
Private Sub Form_Load() m= fac(3) Print “3!= "; m End Sub 3*2
VB最全最经典课件
本章目录
(3) 控件布局属性 控件布局由Location、Size结构来实现，它们 各有一对整数来表示，整数单位为像素。 等效的语句设置： Location 控件左上角位置， Size 控件大小 Button1.Left = 88 例如，命令按钮控件布局 Button1.Top = 48 Button1.Location = New Point(88, 48) Button1.Width = 80 Button1.Size = New Size(80, 32) Button1.Height = 32 也可用Left、Top定位；用Width和Height来 表示控件的宽度和高度。
本章目录
事件过程
事件过程 应用程序处理事件的步骤 它针对某一对象并与该对象的一个事件相联系 应用程序设计的主要工作就是为对象编写事件过 程的代码。事件过程的形式如下：
Sub 对象名_事件(对象引用，事件信息)Handles 事件处理程序
… 事件过程代码
End Sub
对象引用：指向引发事件的对象 事件信息：与事件相关的信息
一个支持下一代Internet的平台
的三种工作模式 设计模式、运行模式、中断模式 组成
组件和代码模块
项目 解决方案 项目
组件和代码模块
本章目录
思考题
1. 什么是.NET框架？ 2. 简述的特点 3. 有多种类型的窗口，若想在设计时 看到代码窗口，怎样操作？ 4. 如何使各窗口显示或不显示？ 5. 如果窗口布局搞乱了，如何恢复默认布局？ 6. 解决方案与项目的区别？
1.1 概述 1.2 集成开发环境 1.3 使用帮助系统
本章目录
1.1 概述
1.1.1 Visual Basic的发展 20世纪60年出现Basic语言； 20世纪80年代，True Basic、Quick Basic和 Turbo Basic等; 1991年Microsoft公司推出Visual Basic1.0，以 可视化工具为界面设计、结构化Basic语言为基 础，以事件驱动为运行机制。从1991年的VB1.0 至1998年的V B6.0的多次版本升级，功能更强 大、完善，应用面更广； 2002年正式发布Visual 。
VB知识点总结全解
VB知识点总结大全第一章VB入门（*）1.2.2 主窗口1．标题栏三种工作模式（1）设计模式：可进行界面设计、代码编制（2）运行模式：不可编辑界面、代码（3）中断模式：不可编辑界面，可以编辑代码2．菜单栏3．工具栏1.2.3 设计窗口1．窗体设计窗口2．代码设计窗口（1）打开方式：1.单击菜单栏的视图——选择代码窗口2.双击窗体、控件3.单击工程资源管理器窗口的“查看代码”（2）主要内容1.对象列表框：显示所选对象的名称。
列出窗体所有可用的对象名。
2.过程列表框：列出所有对象列表框中对象的事件过程或自定义过程的名称。
1.2.4属性窗口由四部分组成：1.对象列表框2.属性排列方式：按字母排列、按分类排列3.属性列表框：左边为属性名，右边为相应的属性值4.属性含义说明：显示所选属性的含义1.2.5 工程资源管理器窗口（1）3个按钮1.“查看代码”：切换到代码窗口，显示和编辑代码2.“查看对象”：切换到窗体窗口，显示和编辑对象3.“切换文件夹”：切换到文件夹显示方式（2）包含两种类型的文件1.窗体文件（.frm文件）：储存窗体上所有控件对象和有关的属性、对象相应的事件过程、程序代码。
2.标准模块文件（.bas文件）：储存所有模块级变量和用户定义的通用过程，该类型可选。
1.2.6 工具箱窗口一般由21个按钮形式的图标构成。
除指针外的20个为标准控件（指针不是控件），每个也是一个类。
如：文本类、图形类等。
1.3.1 建立一个应用程序的步骤1.建立用户界面的对象2.对象属性的设置3.创建对象事件过程及编程4.运行和调试程序5.保存程序和生成可执行文件1.3.2 VB程序结构和编码规则1.程序结构（1）最上面为通用声明段，主要编写模块级以上的变量声明、Option选项的设置等。
（2）以下为程序代码的块结构，也就是事件过程或自定义过程，这构成程序的主体。
块的先后次序与程序执行次序无关。
2.编码规则（1）代码不区分字母的大小写（2）语句书写自由1.同一行可书写多个语句，语句间用冒号分隔2.一个语句可分多行写，要在本行末加续行符“-”（空格和下划线）（3）为了程序的阅读、维护和调试，可加注释1.一般用’(撇号)注释内容2.也可使用工具栏的文本编辑器中的注释第二章可视化编程基础（***）2.1.2 类和象1.对象：具体的控件或窗体等都是对象。
VB知识点概述及复习
第一章Visual Basic概述一．基本概念1.对象：对象就是可控制的某种东西，它是对现实世界中对象的模型化，是代码和数据的组合，同样有自己的状态和行为。
2.属性：对象中的数据，它决定了对象的外观。
3.方法：对象中的代码（包括过程和函数），它决定了对象的行为。
4.事件：能被对象所识别的动作，它决定了对象与对象之间联系的手段。
5.事件驱动：只有在事件发生时程序才会运行。
因此使用VB编程的妙处就在于，只有当用户要以某种特定的方式响应某个事件时，才需要编写针对这个事件的事件过程。
6.工程：是应用程序文件的集合，一个工程一般会包含下列文件，如表1-1所示。
表1-1 应用程序文件类型第二章创建用户界面一．基本概念1.用户界面：它是一个应用程序中最重要的部分，是程序与用户进行交互的桥梁，标准的Windows应用程序界面都是由窗口、菜单条、各种按钮、文本框、列表框等对象构成。
2.窗体：它是设计VB应用程序的一个基本平台，是包容用户界面或对话框所需的各种控件对象的容器。
在创建一个新的工程时，默认的第一个窗体即为启动窗体。
3.控件：是与用户进行交互的可视化部件，向窗体上添加控件应在窗体编辑器中进行。
4.命令菜单：它是应用程序窗口的基本组成元素之一，它由菜单条、菜单、菜单项、子菜单、弹出式菜单组成，可以通过VB提供的菜单编辑器创建程序菜单。
5.设计用户界面的步骤：(1)确定窗体的大小和位置(2)根据程序的功能和要求，添加所需的控件(3)合理地分布控件的位置与大小(4)设置各个对象的属性6.窗体及常用控件的常用属性、事件、方法熟悉各对象的常用属性、方法和事件对于创建应用程序有着举足轻重的作用，下面表2-1给出了窗体及常用控件的常用属性、事件、方法使用说明。
表2-1 窗体及常用控件的常用属性、事件、方法一览表表2-1 (续)表2-1 (续)表2-1 (续)第三章 VB 语言基础一．基本概念1. 过程与模块事件过程(Sub )用户自定义过程(Sub ) 用户自定义函数过程(Function )用户自定义过程(Sub ) 用户自定义函数过程(Function )5.运算符与表达式(2)表达式把常量和变量用运算符、括号连接起来的式子就是表达式。
最新VB教程 07 第七章
授课教师：赵海燕 2010年10--12月
第7章 数组与自定义数据类型
2
数组 7.1 数组概述
数组是变量的扩展，一个数组可以存储多个值，通过数组名和下
标对这些值进行存取。 1．数组的优点
与变量相比，数组有以下优点：
（1）数组能够保存多个值； （2）数组可与循环语句配合实现复杂算法； （3）数组可作通用过程的参数，传递大量的值； （4）数组可作函数过程的返回值，可返回大量的值； （5）数组常用来表示与一维、二维、三维空间分布相关的数据，非常 直观； （5）动态数组可根据需要开辟内存空间，优化程序、提高效率。
打开【例7.2】
14
7.3 动态数组
当在编程时不能预料应该为数组定义多少个元素时，可以使用Visual Basic提供的动态数组。动态数组的维数和下标上下界可以在程序运行
过程中改变。
1， 定义动态数组
定义动态数组的的语法结构与定义常规数组相似，只是括号是空
的： Public|Private|Dim|Static动态数组名( )[As数据类型名] 定义语句确定了动态数组的名称、作用域和数据类型。在使用
10
多维数组
多维数组是指三维或三维以上的数组，是在一维和二维概念上的扩展。多维数 组的定义、元素的访问方式与一维和二维数组类似。 【例】下面定义的是2个多维数组。 Dim a(3,3,4) As Integer ' 3维数组 Dim b(1 To 10,-4 To 5, 10,20) As Single ' 4维数组
m为下标下界，n为下标上界。m和n必须为整型常量，可以
是负值，并要求m≤n。
5
（2）只指定下标上界，由Option Base语句指定下标下界： Dima(n)As... 在模块“代码”窗口顶部的声明段中使用以下语句定义下标下界是0或 1： Option Base0|1 使用“0”时，上界n必须是非负整数常量，使用“1”时，上界n必须是 正整数常量。如果没使用Option Base语句，默认为0。
VB课件完整版讲述
第一章 Visual Basic 程序设计概述
工具箱 状态栏
工具栏 标题栏 工程资源管理器
菜单栏
属性窗口 窗体布局窗口
第一章 Visual Basic 程序设计概述
1、标题栏 三种工作模式
设计(Design)模式 运行(Run)模式 中断(Break)模式
第一章 Visual Basic 程序设计概述
7.ForeColor属性、BackColor属性 例：改变标签中字体的外观及显示颜色
第二章 简单的VB程序设计
8.BackStyle(背景风格)属性 0－Transparent：透明显示 1－Opaque：不透明显示
5、属性窗口 用来显示或设置窗体 或控件的对应属性。
第一章 Visual Basic 程序设计概述
6、窗体窗口 用来指定程序运行时的初始位置，主要为 使所开发的应用程序能在各个不同分辨率 的屏幕上正常运行。
7、工程资源管理器 它保存一个应用程序所有以及组成这 个应用程序所以的文件。 它包含三类主要文件：.frm .bas .cls
一、类：1、(具有共同特征的)一组个体、文献、数据等
2、一个范畴的再划分
第二章 简单的VB程序设计
三个特点： 封装性、继承性、多态性
将数据和操作数据的函数衔接在一起构成一个 具有类类型的对象的描述称为封装。
水果类
桔子类
苹果类
香蕉类
香蕉苹果
富士苹果
第二章 简单的VB程序设计
继承是一种自动地共享类、子类之间的数据 和方法的机制。这个机制自动地为一个类提供来 自另一个类的操作和数据结构，使得程序员只需 要在新类中定义已有类中没有的成分即可建立新 的类。
继承能表达类之间的一种特定关系－－层次 关系。
第7章 VB图形操作
本章主要任务：
掌握建立图形坐标系统的方法；
掌握Visual Basic的图形控件和图形方法及其应用；
掌握使用绘图方法绘制简单的二维几何图形。
本章重点： VB中坐标系，绘图方法的使用 本章难点：容器控件的坐标，及用户自定义坐标系
☆☆ 第7章 图形操作 1
7.1 图形控件
VB中与图形有关的控件有：
☆☆ 第7章 图形操作
5
7.1 图形控件
7.1.3 形状控件Shape
使用Shape控件可在窗体、框架或图片框中创建矩形、 正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由Shape属性的取值决定的。
Shape属性取不同值对应的形状
☆☆ 第7章 图形操作
6
7.1 图形控件
7.1 图形控件
7.1.1 图片框控件——PictureBox
主要作用：显示图片、也可作为其他控件的容器。 1、加载图形： 图形框对象.Picture = LoadPicture(“图形文件名”) 2、删除图形
图形框对象.Picture = LoadPicture( )
3．保存图片 使用SavePicture语句，其使用格式如下：
SavePicture [Object.]Picture|Image, FileName
注意：当 Autosize 属性设置为 True 时，图形框能自动调整大 小与显示的图片匹配 ☆☆ 第7章 图形操作 3
7.1 图形控件
7.1.2 图像框控件——Image控件
图像框比图形框占用更少的内存。图像框内不能保存其
7.3 绘图属性
7.3.1 CurrentX、CurrentY属性 CurrentX，CurrentY属性给出窗体或图形框或打印机在 绘图时的当前坐标。 这两个属性在设计阶段不能使用。 使用格式： object.CurrentX [= x] object.CurrentY [= y] 注意：当使用某些图形方法后，对象的 CurrentX 和 CurrentY的设置值将发生变化，其具体的改变见表7-5。
VB基础教程完整版
计算机等级考试二级VB基础教程1.1 Visual Basic 概述1.Visual Basic是什么Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。
“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic 在原有 BASIC 语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI 有直接关系。
专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。
Visual Basic Scripting Edition (VBScript) 是广泛使用的脚本语言，它是 Visual Basic 语言的子集，可嵌入HTML语言中，用于网页设计，如ASP(Active Server Page)文件。
VB简单易学，通用性强，用途广泛。
2.VB的功能VB可以用于可以开发多媒体、数据库、网络、图形等方面的应用程序。
数据访问特性允许对包括 Microsoft SQL Server 和其它企业数据库在内的大部分数据库格式建立数据库和前端应用程序，以及可调整的服务器端部件。
有了 ActiveX(TM) 技术就可使用其它应用程序提供的功能，例如 Microsoft Word 字处理器，Microsoft Excel 电子数据表及其它 Windows 应用程序。
Internet 能力强大，很容易在应用程序内通过 Internet 或 intranet访问文档和应用程序，或者创建 Internet 服务器应用程序。
VB第9章
2．标准模块 标准模块（文件扩展名为 .BAS）是应用程序内其它模块访问的 过程和声明的容器。它们可以包含变量、常数、类型、外部过程 和全局过程的全局（在整个应用程序范围内有效的）声明或模块 级声明。写入标准模块的代码不必绑在特定的应用程序上；如果 不小心用名称引用窗体和控件，则在许多不同的应用程序中可以 重用标准模块。
第9章 变量与过程的作用域
变量与过程可被访问的范围称为变量与过程的作用域。
9.1 代码模块的概念
对于一个大型的程序，在建立应用程序时，通常应先设计代码的组成结 构。在一般情况下，VB将代码存储在3种不同的模块中（窗体模块、标 准模块和类模块），如图9-1所示。
例如，某工程的模块结构如图92所示。
1．窗体模块
Private Sub Form_Activate() Dim i As Integer For i = 1 To 4 ' 循环4次 tests ' 调用通用过程tests Next i End Sub 通用过程代码如下： Sub tests() Dim a As Integer, x As String ' 定义动态变量a和x，每次 调用重新初始化 Static b, y ' 定义静态变量b和y，保留变量的值 a = a + 1 ' a为动态变量 b=b+1 ' b为静态
Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End If End If End If End Sub 运行程序，如果输入的密码正确，则显示“欢迎使用本系统”，如图9-8 所示；如果输入的密码不正确，则弹出消息框，提示您还有几次机会， 如图9-9和图9-10所示；如果3次输入的密码都不正确，则显示“对不起， 您无权使用本系统。”，如图9-11所示。
金文老师VB教程完整文档
第一章 vasual basic 程序开发环境第一节 visual basic 的启动与退出一. 启动 vb 的四种方法：1. 使用“开始”菜单中的“程序”命令2. 使用“我的电脑”3. 使用“开始”菜单中的“运行”命令4. 建立启动 visual basic6.0 的快捷方式二. vb 启动后的简单设置·1. 新建工程··标准 exe2.（1）SDI 但文档界面（2）MDI 多文档界面“工具”—>“选项”—>“高级”—>“SDI 开发环境”3. 退出 vb：ALT+Q第二节主窗体的组成1.标题栏：设计模式运行模式中断模式2.菜单栏：（12 个）（1）菜单的分类：直接执行弹出对话框下一级菜单( 2）进入菜单栏的方法：<1>ALT 或 F10 激活菜单后光标健选择<2>ALT+激活键注：如果打开了不适当或不需要的菜单，或者执行菜单命令时打开不需要的对话框，可以用 esc 健关闭<3>快捷键：新建工程 ctrl+n 打开工程 ctrl+o 保存工程 ctrl+s3.工具栏（1）工具栏的分类：编辑、标准、窗体编辑器和调试（2）工具栏的形式：固定、浮动（3）标准工具栏图标及作用第三节其他窗体一. 窗体设计器和工程资源管理器（一）窗体设计器窗口1. 窗体设计器窗口简称窗体（）from，是应用程序最终面向用户的窗口，它对应于应用程序的运行结果。
2. 如果想清楚这些小点或者改变点与点间的距离，则可通过执行“工具”菜单中的“选项”命令(“通用”选项卡)来调整。
（二）工程资源管理器窗口1.在工程支援管理器窗口中，含有建立一个应用程序所需要的文件的清单。
工程支援管理器窗口中的文件可以分为 6 类，<1>窗体文件（.frm）<2>程序模块文件（.bas）<3>类模块文件（.cls）<4>工程文件（.vbp）<5>工程组文件（.vbg）<6>资源文件（.res）2.工程资源管理器窗口中文件的分类：（1）工程文件和工程组文件工程文件的扩展名为.vbp，每个工程对应一个工程文件。
第7章VB控制结构
例4-14演示
1. If语句
例4-15:从键盘输入一位作者的稿酬，根据 此稿酬计算出应缴纳的税金和扣除税金后作 者实际得到的稿酬。计算税金的方法是： 800元以内（含800，下同）免税，4000元 以内除800元以外的部分按14%上税，4000 以上按80%的14%上税。
1. If语句
Private sub form_click() Dim m as single,tax as single,wage as single m=Val(inputbox(“请输入稿酬”)) If m<=800 then tax=0 ElseIf m<=4000 Then tax=(m-800)*0.14 Else tax=m*0.8*014 End If wage=m-tax print “稿酬为:”;m, “税收为:”;tax,“实际酬金为”;wage End sub
例4-13演示
End sub
1. If语句
例4-14：编写一程序，能将大写字母方式 输入的一个字符转换为小写字母，小写字 母的字符转换成大写字母，其它非字母字 符不改变。
1. If语句
Private sub form_click() Dim ch as string ch=inputbox(“请输入一个字符”) print “输入的原始字符为”；ch If ch>=“A” and ch<=“Z” then ch=Lcase(ch) ElseIf ch>=“a” and ch<=“z” Then ch=Ucase(ch) Else ch=ch End If print “输出字符为”；ch End sub
例4-10演示源自1. If语句例4-11：输入a,b,c三个整数，输出其中最大的
VB教程第7章教案
创建通用过程的方法
通用过程(Sub/Function)过程可以保存在两种模块中: 过程可以保存在两种模块中: 通用过程 过程可以保存在两种模块中 窗体模块(.frm)和标准模块(.bas) 和标准模块 窗体模块
(1) 在窗体模块中创建通用过程: 在窗体模块中创建通用过程:
可以在代码窗口中直接键入来创建Sub过程 过程 可以在代码窗口中直接键入来创建 选择"工具"菜单中的"添加过程"命令 选择"工具"菜单中的"添加过程"
程序运行结果
例7.1 主页
Sub过程的定义和调用 Sub过程的定义和调用
1. Sub过程定义格式: 过程定义格式: 过程定义格式
[Private|Public | Static] Sub 过程名 参数表 | 过程名([参数表 参数表]) 语句块 [Exit Sub] End Sub
2. 调用 调用Sub过程有以下两种方法: 过程有以下两种方法: 过程有以下两种方法
(1) 使用 使用Call语句.格式: 语句. 语句 格式: Call 过程名 [实参表]) 过程名([实参表] 直接使用过程名,格式: (2) 直接使用过程名,格式: 过程名[实参表] 过程名[实参表] 例如,调用名为SubCal的过程: 例如,调用名为SubCal的过程: SubCal的过程 Call SubCal(10) SubCal 10
主页
例7.2
计算5! 计算5! + 10!
因为计算5!和 都要用到阶乘 都要用到阶乘n! = × × × × 因为计算 和10!都要用到阶乘 (n!=1×2×3×…×n) 所以把计算n!编成 编成Sub过程 所以把计算 编成 过程 采用Print直接在窗体上输出结果,程序代码: 采用 直接在窗体上输出结果,程序代码: 直接在窗体上输出结果 Private Sub Form_Load() Show Dim y As Long, s As Long Call Jc(5, y) Private Sub Jc(n As Integer, t As Long) s=y Dim i As Integer Call Jc(10, y) t=1 s=s+y For i = 1 To n Print "5! + 10! ="; s t=t*i End Sub Next i 程序运行结果: 例 程序运行结果: 7.2 End Sub 5! + 10! = 3628920 注意参数n及 的调用情况 注意参数 及t的调用情况
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第七章理论复习题1、阅读下列程序：Private Sub Form_Click()Dim m As IntegerStatic n As IntegerFor i = 1 To 3n = n + im = m + i ^ 2NextPrint m, nEnd Sub运行时两次单击窗体结果为（）。
A、14 614 6B、14 614 12 C、14 628 6D、14 628 122、窗体上的命令按钮编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i, j As IntegerFor i = 2 To 4For j = 3 To 5array1(i, j) = i * jNext jNext iPrint array1(2, 4) + array1(3, 4)End Sub运行时，单击命令按钮后输出的结果是（）。
A、9B、13C、程序出错D、205、以下数组声明语句中数组a包含的元素个数为（）。
Dim a(3,-2 to 1,5)A、96B、75C、60D、136、有声明Dim a(-3 to 1,3) As Integer，则下列叙述中正确的是（）。
A、数组a是二维动态数组B、数组a共有20个元素C、a（0,0）不是该数组的元素D、a（1,1）是该数组的第十个元素7、下列叙述中错误的是（）。
A、控件数组的每一个元素共享同样的事件过程B、控件数组的每一个元素都有与之相关联的下标值C、控件数组的每一个元素都有不同的name属性作为标识D、可在运行过程中删除控件数组的某个元素8、能使一维数组arr(6)元素个数加1，但保留数组中原有元素的语句是（）。
A、R eDim arr(7)B、R eDim Preserve arr(7)C、P ublic arr(1 to 7)D、S tatic arr(7)9、运行下列程序，单击窗体时在窗体上显示的结果是（）。
Private Sub Form_Click()Dim aDim s As Integer, i As Integera = Array(1, 2, 3)For i = 2 To 0 Step -1s = s + a(i) * a(i)Next iPrint sEnd SubA、13B、不确定C、14D、程序出错10、运行下列程序，单击窗体后输出的结果是（）。
Option Base 0Private Sub Form_Click()Dim aDim I as integerA=Array(1,2,3,4,5,6,7,8,9)For I=1 to 3Print a(5-I);Next IEnd SubA、3 2 1B、4 3 2C、5 4 3D、6 5 411、要将字符串数组a中所有学生姓名按数组下标顺序追加到列表框list1中，可以使用的程序段为（）。
A、F or i = 0 To UBound(a) - 1List1.AddItem a(i), 0 Next iB、F or i = 0 To UBound(a) - 1List1.AddItem a(i) Next i C、L ist1.AddItem aD、F or i = 0 To UBound(a) - 1List1.List(i) = a(i)Next I12、如下程序段中包含一个错误。
X＝4Dim a（X）For m＝4 to 0 step －1a（m）＝m +1Next m出错的原因是（）。
A、第四行，数组元素a（m）下标越界B、第四行，不能用循环变量m进行运算C、第二行，不能用变量定义数组下标D、第三行，循环语句格式不对13、下列语句错误的是（）。
A、P rivate a（－10 to 5）B、D im a(N)‘N为变量C、D im a() As IntegerD、D im a%(10,－10 to －10)14、能刚好存放如下方阵数据的数组声明语句是（不能浪费空间）（）。
1.12.23.34.45.56.67.78.89.9A、D im A(9) as SingleB、D im A(3,3) as SingleC、D im A(-1 to 1,-5 to -3) as SingleD、D im A(-3 to -1,5 to 7) as Integer15、以下定义数组或给数组元素赋值的语句中，正确的是（）。
A、D im a As Varianta=Array(1,2,3,4,5,6) B、D im a(10) As Integera=Array(1,2,3,4,5,6) C、D im %A(10)a(1)="ABCD"D、D im a(3),b(3)As Integera(0)=0:a(1)=1:a(2)=2: b=a16、在窗体上画三个单选按钮，组成一个名称为ChkOption的控件数组。
用于标识各个控件数组元素的属性是（）。
A、T agB、N ameC、I ndexD、V alue17、下列关于控件数组的说法中，正确的是（）。
A、控件数组可以由不同类型的控件组成B、同一个控件数组中各元素的Name属性值不同C、同一个控件数组中，每个元素的属性设置值都相同D、控件数组必须由同类型的控件组成18、阅读如下程序：Private Sub Command1_Click()Dim a(1 To 10) As Integer, p(1 To 3) As Integer, i%, k%k = 5For i = 1 To 10a(i) = iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) * 2Next iPrint kEnd Sub运行上面的程序，单击命令按钮Command1，窗体显示的内容为（）。
A、22B、33C、44D、5519、以下程序段执行的结果是（）。
Private Sub Command1_Click()Dim aDim i As Integer, j As Integera = Array(1, 3, 5, 7, 9, 11)For i = 1 To a(4)j = j + 1Next iPrint jEnd SubA、7B、5C、9D、1120、如下数组声明语句中数组a包含的元素个数为（）。
Dim a(3,-1 to 1,6) 4*3*7个数组元素A、84B、54C、72D、1821、窗体上有命令按钮Command1，编写下列事件过程：Private Sub Command1_Click() Dim a(10) As IntegerDim p(3) As Integerk = 1For i = 1 To 10a(i) = iNext iFor i = 1 To 3p(i) = a(i * 3)Next iFor i = 1 To 3k = k + p(i) * 2 Next iPrint kEnd Sub运行时单击命令按钮，窗体将显示（）。
A、15B、13C、30D、3722、以下程序段中有（）处错误。
ReDim a As Integern + 3 = na = 0 ;b = 1Print n + 3 = nA、1B、2C、3D、423、在通用声明中给出Option Base 1语句，则数组a包含（）个元素。
Dim a(3, -2 To 1, 5)A、120B、75C、60D、1324、运行下列程序，单击窗体后输出的结果是（）。
Private Sub Form_Click()Dim aDim s As Integer, i As Integera = Array(1, 2, 3, 4, 5, 6)s = 1For i = 5 To 1 Step -2s = s * a(i)Next iPrint sEnd SubA、15B、48C、120D、72025、对窗体上的命令按钮编写如下事件过程：Private Sub Command1_Click()Dim arr(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 10For j = 1 To 10arr(i, j) = i + 2 * jNext jNext iPrint arr(0, 1) + arr(2, 3)End Sub运行时，单击命令按钮后输出的结果是（）。
A、8B、10C、20D、下标越界26、窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()Dim s%, i%, j%Dim a(3, 3) As IntegerFor i = 1 To 3For j = 1 To ia(i, j) = js = s + a(i, j)Next j, iPrint sEnd Sub运行时，单击按钮，则窗体上显示的内容是（）。
A、6B、9C、10D、1827、运行下列程序，单击窗体后输出结果是（）。
Private Sub Form_Click()Dim aDim i As Integer, j As Integera = Array(1, 2, 3, 4, 5, 6)For i = 1 To a(5)j = j + 1Next iPrint jEnd SubA、0C、5B、6D、程序出错28、设arr是一个上界为K的一维动态数组。
能使arr元素个数增加1，但保留数组中原有数据的语句是（）。
A、R eDim arr(K + 1)B、R eDim Static arr(K + 1)C、P ublic arr(1 To K + 1)D、R eDim Preserve arr(K + 1)29、能使一维数组arr(6)元素个数加1，但不保留数组中原有元素的语句是（）。
A、R eDim Preserve arr(7)B、P ublic arr(1 to 7)C、S tatic arr(7)D、R eDim arr(7)30、以下关于控件数组的描述中，正确的是（）。
A、同一控件数组中的控件所有属性值都相同B、同一控件数组中的控件其Index属性值不同C、同一控件数组中的控件类型可以不同D、同一控件数组中的控件名称不同31、以下有关数组的说明中，正确的是（）。
A、用ReDim语句重新定义维数时，不得改变该数组的数据类型B、无论是动态数组还是静态数组，数组一旦定义，其维数是不能重新定义的C、用ReDim语句重新定义维数后，原有的数组元素内容将不予保留D、在过程中可以用Private语句定义数组第八章理论复习题1、窗体上有命令按钮Command1和Command2，阅读下列程序：Dim a As IntegerPrivate Sub Form_Load()a = 0: a = a + 1End SubPrivate Sub Command1_Click()Dim a As Integera = a + 2Print a,End SubPrivate Sub Command2_Click()Print aEnd Sub运行时，先后单击Command1和Command2按钮，输出的结果为（）。