VB知识点小结.pdf

《VB知识点小结.pdf》由会员分享，可在线阅读，更多相关《VB知识点小结.pdf（48页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB 第一章Visual Basic 概述第二章创建用户界面第三章Visual Basic 语言基础第四章算法基础及Visual Basic 的基本语句第五章数组第六章程序调试第七章文件第八章过程第九章图形处理及多媒体应用（简单介绍）第十章数据库操作及编程（选择内容）第三章Visual Basic 语言基础1.VB 程序代码的组织结构VB 程序是由 界面 和程序代码 两部分组成，而程序代码又是由说明部分 和过程 两部分组成的。所谓 过程，就是由 Sub 开头，End Sub 结尾的，包含若干条语句的有特定书写格式的代码组合。根据过程执行的方式，可分为事件过程 和通用过程 两类。1）事件过程：定

2、义：由事件驱动而执行的，用于响应用户或系统引发的事件的代码过程。如窗体的Load过程、命令按钮的Click 过程等。特点：缺省情况下，事件过程是Private 的，即仅在所属的窗体范围内有效。存储：事件过程是存储在窗体模块文件中，扩展名为.frm 注意：事件过程的过程名及参数是系统定义好的，其参数不得随意改变。2）通用过程：定义：可以被多个窗体和过程调用执行的代码过程。特点：缺省情况下，通用过程是Public 的，即可被所有窗体共享，但也可以定义成Private。存储：在窗体中定义的通用过程直接存储在窗体模块文件中；在标准模块中定义的通用过程是存储在扩展名为.Bas 的标准模块文件中。注意：通

3、用过程的过程名及参数由用户自行定义。3）模块：模块是组织过程代码的一种结构。VB 提供了三种类型的模块：窗体模块、标准模块和类模块。窗体模块：和每个窗体相对应的模块，包含窗体及其中所有控件的属性设置、相关说明和所有事件过程。标准模块：存放为多个窗体所共享的通用过程的独立代码模块，不属于任何一个窗体，主要在大型应用程序中使用，保存在扩展名为.Bas 的文件中。类模块：存放开发者自行创建的类的属性、方法等。2.VB 程序的书写规范和程序注释1）语句VB 程序的最基本的成分格式：语句体 按行书写;一个语句可通过续行符号“_”（一个空格加一个下划线）分成多行写；多个语句也可以通过分行符号“：”（冒号）

4、写在一行上。语句定义符规定语句的功能，语句体提供语句要说明的具体内容。2）书写规范字母无大小写区分一行代码输入完毕，按回车键进入下一行一般采取阶梯型书写格式，使程序可读性好，便于查找错误（严格执行）代码中除了中文字外，所有的符号都必须在英文状态下输入3）程序注释语句格式一：Rem 格式二：说明：给程序加注释，增强程序的可读性，该语句为非执行语句。3.vb 数据的类型1）数据类型Integer:整型数，2 个 Byte Long:长整型数，4 个 Byte（存放无小数的整数）Single:单精度数，4 个 Byte 7 位有效位Double:双精度数，8 个 Byte 15 位有效位（存放有小数

5、的整数）Currency:货币型，8 个 Byte 精度高，15 个整数和4 个小数Byte:Byte 型数，1 个 Byte（一般存储二进制信息）Boolean:逻辑型，2 个 Byte True 或 False String:字符串型，分为定长和不定长两种Date:日期型，8 个 Byte Object:对象型，4 个 Byte 保存对某对象的引用（内存地址）Variant:变体型，16 个 Byte VB 应用程序窗体文件标准模块文件声明部分事件过程通用过程全局声明部分模块声明部分通用过程类模块文件2）常量:指在程序运行过程中值保持不变的量,分为 直接常量 和符号常量 两种。（一）直接常

6、量(1)数值常量由正负号、数字和小数点组成，正数的正号可以省略科学计数法格式：e/d 说明：幂为10，e 为单精度，d 为双精度八进制和十六进制常量表示无符号整数八进制：&O 十六进制：&H(2)、字符常量用双引号将一串字符括起来，构成字符常量字符长度：字符串中字符的个数，不包括双引号字符串的长度最多可达65535 个注意区别空格串和空串，输入双引号必须用“”字符串常量区分大小写，如字符串A 和字符串 a是两个不同的常量字符串比较：从字符串的左端开始，一一对应比较至不同的字符，字符的ASCII 码值大的字符串大，ASCII 码值小的字符串小。如：“欢迎进入VB”，“Visual Basic”,

7、“123”，“A”(3)、逻辑常量只有两个取值，True 和 False 无界定符Vb 中通常用0 表示 False，其他数值均表示True(4)、日期时间型常量即可以表示日期，也可以表示时间一般表示形式是mm/dd/yy，hh:mm:ss 用#作为界定符例：#1/2/1999#1999-1-2#Jan 2,1999#January 2,1999#12:00:00 AM#12:00:00 PM#8:20:20 PM#2:00:00 PM#都合法（二）符号常量说明语句格式：Public|Private Const As Type=在模块通用声明中，Public 和 Private 用于定义常量的

8、使用范围，缺省为Private(窗体模块级)在窗体模块中不能用Public 定义全局符号常量表达式中不能包括函数，可使用除IS 外所有算术和逻辑运算符，也可以使用其他常量例：Const pi as Single=3.14159 Private Const ch=“CPU”Public Const x as Integer=3*5 在标准模块中定义全局级常量，但若出现在窗体的通用声明中则出错。注意：符号常量定义后，在程序中只能读不能修改。如：ch=“CMOS”错误3)变量-在程序运行时，其值可以改变的数据。-例：Dim X As Integer X（变量名）内存单元X=2666 X 2666（变

9、量值）X=0 X 0(一)变量名的命名规则必须以字母开头不超过 255 个字符在作用域内必须唯一字符串内不得包含点号和用于隐性类型说明的符号不得使用系统保留字（如End Private Sub）注意:在代码编辑器中,若定义的变量名不合法,则有出错提示,且变量名显示为红色.(二)变量的作用域与变量说明语句（1）.变量的作用域：局部变量：在过程中说明的变量，只在该过程中有效；窗体/模块变量：在模块中说明的Private 变量，在该窗体或模块中有效;全局变量：在模块中说明的Public 变量，在整个应用程序中有效。（2）变量说明语句-过程级变量（局部变量）在过程中声明Dim|Static As -模

10、块级变量在模块的“通用”中“声明”Private|Dim As -全局变量在模块的“通用”中“声明”Public As 例：Dim a1 As Integer Public strName As String Private dtBirthday 变体型几点注意：隐式说明 类型声明符，见P47，表 3-4 例：k&=1 Country$=“China”变量初值：当一个变量说明之后，系统自动为其赋一个初始值。数值型数据的初值为0；字符型数据的初值为空串“”；逻辑型数据的初值为False；日期型数据的初值为1899-12-30，0：00：00 变量的赋值赋值语句形式 变量名=表达式例：a=1:b=

11、2:x=a+b x 的值为 3 一条语句声明多个变量Private|Dim|Static|Public As，As 例：Dim x,y,z as Integer,s as string x 和 y 是变体型，z 是整型，s 是字符串型字符串的定长说明：Private|Dim|Static|Public As String*例：Dim Number As String*7（注意:不能在窗体模块中定义全局定长字符串.）强制显式说明语句格式：Option Explicit 功能：要求每一个变量都必须经过显式说明才能使用，否则产生出错信息。强制显式说明的好处：一个变量如果不定义，会被当作变体类型来进行

12、处理，从占据的内存空间看，势必会造成浪费；变量定义之后，若输入变量名正确，系统会自动按定义时的格式转换输入的变量名，否则提示输入错误。Option Explicit语句应在模块的通用说明部分输入；系统能够自动产生Option Explicit语句，设置如下：执行“工具”菜单的“选项”在“选项”对话框中选取“编辑器”标签选中“要求变量声明”项单击“确定”按钮返回此后系统会在新建的下一个工程中自动在代码窗口产生强制说明语句4、运算符与表达式1）算术运算符与算术表达式算术运算符：乘方（）、加（+）、减（-）、乘（*）、除（/）、整除（）、取余（Mod）、字符串连接（&）优先级：-（单目减）*和/Mo

13、d+和-&举例：13+3 16 13*3 39 13/3 4.33333333333333 133 4 13 mod 3 1“13”&“3”133“a”&“b”ab#1/2/2001#+1 1/3/2001 算术表达式：将常量、变量、函数等用算术运算符连接起来的式子说明：括号的优先级大于任何运算符例：表达式为：(-b+Sqr(b2-4*a*c)/(2*a)注意：括号要一一对应，分子分母部分应该用括号括起来，只能使用小括号；乘法要用乘号分隔，除法写在同一行。&前后必须留有空格aacbb2422）关系运算符与关系表达式关系运算符小于（）、小于等于（）、大于等于（=）、不等于（）、等于（=）、比较对

14、象的引用变量（Is）关系表达式：将常量、变量、函数或算术等其他表达式用关系运算符连接起来的式子如果关系运算符的两端是表达式，则先计算表达式的值，然后进行比较关系运算符两端必须是同类变量、表达式，否则出错关系表达式的结果必然是逻辑值例：a0“ABC”“ACB”结果为false#1/1/2000#1/2/2000#结果为True 3）逻辑运算符与逻辑表达式逻辑运算符非（Not）、与（And）、或（Or）、异或（Xor）优先级：Not And Or Xor 逻辑表达式：将逻辑量用逻辑运算符连接起来的式子如果逻辑运算符的两端是关系表达式，则先计算关系表达式的值，然后进行逻辑运算逻辑表达式的操作数是逻辑

15、值，结果是逻辑值例：判断0 x0 And x0 And Y0 And X*X+Y*Y 0。Exp(x):返回 ex。Abs(x):返回 X 的绝对值。Sgn(x):判断 X 的符号：Sin(x)、Cos(x)、Tan(x)、Atn(x)：分别返回X（单位为弧度）的正弦余弦、正切和反正切函数值，返回值为Double 型Rnd(x):返回一个（0，1）之间的Single 类型随机数。X 决定产生随机数的结果，具体情况请查阅 Help。Randomize 语句可帮助产生真正意义上的随机数。2）、字符函数Len(x):返回字符串x 中字符的个数。Left(x,n):返回从字符串x 的左边开始的n 个字

16、符形成的子串。Right(x,n):返回从字符串x 的右边的n 个字符形成的子串。Mid(x,n1,n2):返回从字符串x 的第 n1 个字符开始的n2 个字符。Ucase(x)将 x 中小写字母转换成大写字Lcase(x):将 x 中大写字母转换成小写字母Ltrim(x)、Rtrim(x)、Trim(x):分别去掉x 左边的所有空格、右边的所有空格和两边的所有空格。Instr(n,x,y):返回 y 在 x 从第 n 位开始出现的位置，不存在返回0 String(n,y):返回由 n 个字符 y 组成的字符串，若y 是一个字符串，则取其第一个字符。Space(n):返回由 n 个空格组成的字

17、符串。3）转换函数Str(x):将数值型数据x 转换成相应的字符串，保留正数符号位CStr(x):将 x 转换成字符串，如X 为数值型，不保留正数符号位Val(x):将字符串X 最左端开始的数字字符串转换成数值。遇到不能转换的字符为止。若字符串无法被转换时，返回0。Val(-16.6those)结果为-16.6 Chr(x):返回以 x 为 ASCII 码值的字符。Chr(97)为“a”，Chr(65)为“A”，Chr(13)为回车符Asc(x):返回字符x 的编码值。Fix(x)、Int(x):当 X0 时，都返回X 的整数部分而删除小数，当 X0 时，Int 返回小于等于x 的最大整数。F

18、ix 返回大于等于X 的最小整数。Int(-5.1)-6 fix(-5.1)-5 4）日期函数Date:返回系统日期。Time:返回系统时间。Now:返回系统日期和时间。Year(x):返回 x 的年份。Month(x):返回 x 的月份。Day(x):返回 x 的日期。010001)(xxxxSgnWeekday(x,c)：返回 x 的星期号。5）格式化函数Format$功能：将数值、日期和时间按指定格式输出。格式：format(,fmt$)fmt$用于格式输出的字符串；省略，则类似于CStr 函数格式控制字符：数位控制符：#、0 标点控制符：.、，指数输出控制符：E+、E-符号控制符：%、

19、$、-、+格式化函数Format 仅用于控制数据的外部输出格式，不会改变数据在计算机内部的存储形式+、在所要显示的数值前强加一个正号或负号举例：设 x=123456.78，Print Format(x,”0000000000.0000”)结果：0012345678.7800 x 的位数少于控制字符串的位数，自动在前后补0 Print Format(x,#)结果为：123457 x 的位数少于控制字符串的位数，自动在前后补空格Print Format(x,#,#,#.#)结果为：123,456.8 增加千分位分隔符和小数点，使x 四舍五入到一位小数Print Format(x,“#%”)结果为：

20、12345678%以百分比的形式表示，x 乘 100 后再加上百分号Print Format$(x,0.00E+00)结果为：1.23E+05 用指数形式表示数值第四章算法基础及Visual Basic 的基本语句1、算法及程序设计基础1）算法的描述程序流程图2）基本算法结构（1）顺序结构结构化程序设计（2）选择结构结构化程序设计（3）循环结构结构化程序设计三种基本结构的共同特点：只有单一入口和单一出口；结构中的每一部分都有被执行的可能；结构内不应出现永不终止的死循环。2、赋值语句及InputBox、MsgBox 函数1）、赋值语句格式：=功能：先计算表达式的值，再将该值赋予左端的变量。说明：

21、-赋值号左端不仅可以是变量名，还可以是对象的属性；-表达式的类型和变量的类型要一致-赋值语句是按语句出现的先后顺序执行的（顺序结构）举例：str1=Nice to meet you number%=72 Lable1.Caption=Filename is:Text.FontSize=12 改变字号语句 1 语句 2 语句块条件满块 1 块 2 True False 块True False 条件使用下面的方法可以获取一个对象的属性值：var=object.Property 例如：Label1.Caption=Text1.Text 式中，var 是变量名、object 是对象名、property

22、 是该对象的某个属性名。特别注意：（1）属性也存在数据类型，所以在获取对象的属性值时，最好使用具有相同数据类型的变量。（2）赋值号（=）与比较运算符（=）不同赋值是独立的一条语句；由运算符（=）连结两个操作数的关系表达式是语句的一部分,不可单独存在比较运算符不会改变操作数的值；赋值语句会，改变赋值号左边的量，所以必须是可以被赋值的变量或属性例：Dim x As Integer,y As Integer,z As Boolean x=3:y=4:y=x z=x=y Print x,y,z 2）InputBox 函数格式：InputBox$(,)功能：弹出对话框，用户输入数据后回车或单击“确定”按

23、钮后，将输入内容赋值给相应的变量；按 ESC键或单击“取消”按钮，返回空串。说明 （1）prompt：必选项。对话框中的提示信息。（2）title：可选。对话框的标题。省略则为应用程序名。（3）default：可选。显示在用户编辑框中的缺省值，省略为空。（4）x,y:可选。指定对话框的显示位置，省略则居中。例：i=InputBox(“输入数组元素”+Chr(10)+“第一个元素为:”，程序示例,100)3）MsgBox 函数格式：MsgBox(Prompt,Button,Title,HelpFile,Context)功能：向用户发布提示信息，并要求用户作出必要的响应。说明：（1）Prompt:

24、必选项。字符串表达式，对话框中的提示信息。标提 示 字符缺省值（2）Button:指定显示按钮的数目及形式，使用的图标样式，这是一个由4 个数值常量组成的式子，形式为c1+c2+c3+c4，用于决定信息框中按钮的个数和类型以及出现在信息框中的图标类型，各个参量的可选值及其功能;详见 P.62 表 4.2（3）Title:对话框标题栏的显示信息。3、分支结构与分支结构语句1）If-Then-Else-End If语句(1)If-Then-Else-End If语句逻辑框图：格式 1：If Then Else End If 功能：如果条件成立，则执行A 组语句，否则执行B 组语句。说明：If 和

25、End If 语句成对出现，缺一不可；Else 和 B 组语句部分可以省略,当条件不成立时,直接执行End If 的后继语句；格式 2：单行 If-Then-Else 语句If Then Else 说明：（1）在 A 组语句和B 组语句都只有一个语句时，可使用该格式；（2）End If 语句省略。格式 3：If Then End If 格式 4:If Then （2)嵌套的 If 结构在 If 语句的“语句块”中包含另一个If 语句，叫做嵌套的If 结构。B 组语句条件？不成立成立A 组语句条件满足?块 1 True Fals逻辑框图If Then 外层If Then 内层Else If th

26、en Else 最内层End If Else If Then End If End If(3)多分支 If-Then-ElseIf 语句格式：If Then ElseIf Then ElseIf Then Else End If 功能：-对条件自上而下依次判断,若条件 i 成立,则执行相应的Ai 组语句；-若所有条件都不成立，则执行An+1 组语句。-无论执行了哪个语句块，都将执行End If 的后继语句。说明 （1）该语句结构可以解决多分支问题，只有一个End If 语句，避免If 语句嵌套层数过多的情况；（2）Else 语句可以省略；（3）该结构是一个单出口的结构，即只会执行一组语句，若条

27、件中有两个成立，则按语句的顺序执行前面的一组语句。2）、多分支Select-Case-End Select 语句格式：Select Case Case Case Case Case Else 条件 1 条件 2 假假真真语 句 块语 句 块条件真假语句块 n 语句块 End Select 功能：计算测试表达式的值，自上而下检查测试条件;若表达式的值符合测试i，则执行相应的语句块i；若所有条件都不成立，则执行语句块n+1。无论执行了哪个语句块，都将执行End Select的后继语句。说明 （1）测试表达式可以是算术表达式或字符表达式；（2）测试条件有四种形式：常量，如2、3、“A”等闭区间，如3

28、 To 78、“B”To“H”等开区间，如Is20、Is“P”等以上三种形式的组合，以逗号间隔，条件组合是或的关系，不能表示与的关系（3）Case Else语句部分可以省略；（4）以 End Select 语句结束；（5）该结构是一个单出口的结构，即只会执行一个语句块，若条件中有两个成立，则按语句的顺序执行前面的语句块。4、循环结构与循环结构语句由一定的条件控制，反复执行某个程序段的程序结构称为循环结构。用于解决一些需要重复进行某些操作的问题。循环要素：&循环控制条件条件或逻辑表达式&循环体 重复执行的语句块&为防止死循环，在循环体内必须要有对应语句，使得循环控制条件会不满足，结束循环运行。*

29、“当型”循环条件成立时，执行循环体图一图二图 1：先判断条件，当条件成立则执行循环体，否则执行循环结构的后续语句。图 2：先执行一次循环体，然后再判断条件，决定是否继续执行循环，此结构至少执行一次循环体。条件？循环体成立循环的后继语句不成立条件？循环体不成立循环的后继语句成立*“直到型”循环条件不成立时，执行循环体图三图四图 3：先判断条件，条件不成立则执行循环体，直到条件不成立，执行循环结构的后续语句。图 4：先执行一次循环体，再判断条件，决定是否继续执行循环。1）Do-Loop 循环结构语句格式一Do While Loop 当型循环执行步骤：1 判断条件是否成立。如果条件不成立，转向第4

30、步2 执行循环体；3 转向执行第1 步；4 执行 Loop 语句的后继语句。格式二：当Do 型 循Loop While 环执行步骤：1 执行循环体；2 判断条件是否成立。如果条件成立，转向第1 步3 条件不成立，则结束循环，执行Loop 语句的后继语句。条件？循环体不成立循环的后继语句成立条件？循环体成立循环的后继语句不成立条件？循环体成立Loop 的后继语句不成立条件？循环体不成立Loop 的后继语句成立格式三Do Until Loop 直到型循环执行步骤：1 判断条件是否成立。如果条件成立，转向第4 步2 执行循环体；3 转向执行第1 步；4 执行 Loop 语句的后继语句。格式四Do L

31、oop Until 直到型循环总结：（1）While 短语总是在条件成立时，继续进行循环；条件不成立时，结束循环。因此用于“当型”循环；（2）Until 短语总是在条件不成立时，执行循环体；条件成立时，则结束循环。因此称为“直到型”循环；（3）上述两条短语是可以相互转换的。Do While i=10 print“hello”print“hello”i=i+1 i=i+1 Loop Loop 条件？循环体不成立Loop 的后继语句成立条件？循环体不成立Loop 的后继语句成立格式五（特殊形式）：Do Loop Do print“hello”i=i+1 If i=10 then Exit Do L

32、oop 执行过程：反复执行循环体。该结构称为“死循环“，在循环体内必须通过Exit Do 语句强制退出循环体。Exit Do 语句一般与If-then 语句结合使用，即当满足某一条件时，才强制退出循环。If Then Exit Do 强调Exit Do 是直接退出DO 循环，执行 LOOP 的后续语句，即不再执行exit do 和 Loop之间的语句。Do-Loop 语句使用说明（1）Do 和 Loop 为循环结构关键字，必须成对出现，缺一不可；（2）循环体为可执行语句组成,可以嵌套分支结构和循环结构；（3）语句Exit Do 用于无条件退出循环，可在任意Do-Loop 语句结构的循环体中出现

33、。（4）使用循环结构，一定要避免死循环的出现。2)计数循环（For-Next 循环）格式：For=To Step 循环体Next 功能：由计数变量控制，有限次地执行循环体。步骤：1.计算初值、终值和步长值，将初值赋予计数变量；2.比较计数变量和终值，若计数变量大于终值，结束循环；3.计数变量小于终值，执行循环体；4.计数变量=计数变量+步长值5.转向第 2 步。循环体Loop 后续语句计数变量=初值计数变量 终值是循环体计数变量=计数变量+步长值否计算初值，终值，步长说明 For-Next 是关键字，成对出现，缺一不可；循环体由可执行语句组成，可嵌套分支结构和循环结构；计数变量应为整型或单精度

34、型，初值、终值和步长值为相应类型的表达式；步长值可以为正，也可以为负，省略时默认步长值为1；循环次数为：Int(终值-初值）/步长值）+1 Exit For 语句可以出现在循环体中，用于无条件退出循环注意：（1）Exit For 语句直接退出本次循环，Exit For 语句和 Next I 语句之间的语句跳过。（2）初值、终值和步长值的值若在循环体中改变了，不会改变初值、终值和步长值。3）循环的嵌套所谓循环的嵌套，是指在循环结构中包含另一个循环结构。条件循环和计数循环可以相互嵌套。格式：For For Do Do For Do Do For Next Loop Loop Next Next N

35、ext Loop Loop 说明 （1）内层循环必须完全包含在外层循环之中，不能交叉；（2）内层循环中还可以嵌套循环结构，但建议不要使用多层循环，解决一般问题最多需要三重循环；（3）在多重DO-LOOP 循环中，若有EXIT DO 语句，则只会强制退出该语句所在的循环，并执行 LOOP 的后续语句，并不会退出所有的循环。（4）在多重 FOR-NEXT 循环中，若有 EXIT FOR 语句，则只会强制退出该语句所在的循环，并执行 NEXT 的后续语句，并不会退出所有的循环。第五章数组1)数组的概念前面所说的变量都是指简单变量，即一个变量名对应一个存储单元，只能存储一个值，各个变量之间无关联。本章

36、我们要介绍的是一种下标变量数组，是通过一个数组名和下标的组合来表示多个值。用一个相同的名字引用一组变量的数据。数组，是 VB 支持的一种复合结构的数据类型。数组，是用于保存一组具有相同数据类型的有序的变量的集合。（1）数组命名与数组元素命名规则与简单变量相同。(参阅 P45)数组名不是代表某一变量，而是一组变量。数组元素：由数组名和该元素在数组中的编号（索引、下标）唯一确定，下标是连续的整数。数组元素的一般形式：数组名（下标1，下标 2，）数组的维数：一维数组只需一个下标即可唯一确定一个数组元素多维数组有两个或两个以上下标的数组，每个下标对应一个“维”。（2）数组定义数组必须先定义后使用。定义

37、数组时，确定其名称、数据类型、维数、每一维的上、下界。数组定义时，系统分配连续的内存空间，用于依次保存所有数组元素。固定大小数组与动态数组。*数组说明语句格式：Public|Private|Static|Dim 数组名(To，To,)As 类型说明：声明关键字决定作用域，见下页 TO 决定了每一维的大小，下界 指下标的最小值，上界 指下标的最大值，其中 TO 可省略，此时，默认下界是0。我们习惯于下标是从1 开始，可在模块的“通用”声明段中使用如下语句Option Base 1 则在缺省下界的情况下，默认下界是1。关键字使用位置作用域Public 在标准模块的声明段中全局Private 和 D

38、im 在模块的声明段中模块Dim 在过程中局部Static 在过程中局部、静态注意：全局数组、全局符号常量和全局定长字符串只能在标准模块中定义举例Dim a(6)as integer 数组元素分别为：a(0)、a(1)、a(2)、a(3)、a(4)、a(5)、a(6)，共 7 个Private Name(1999 to 2002)as string*8 数组元素分别为：name(1999)name(2000)name(2001)name(2002),用于保存长度为8的字符串数据。Dim b(2,1 to 2)as integer 数组元素分别为：b(0,1)，b(0,2)，b(1,1)，b(1

39、,2)，b(2,1)，b(2,2)注意：在声明语句中的A（6）是数组说明符，而在程序其他语句出现的A（6）是一个数组元素。*数组的上、下界上、下界表示下标的最大、最小值；下界上界；在固定大小数组定义时，上、下界是常量或常量表达式，不得是变量；上、下界应是整数，若不是，则自动四舍五入。*数组的类型可为任一简单数据类型*数组的大小指数组中包含元素的个数。一维数组元素个数：上界-下界+1 二维数组元素个数：（上界1-下界1+1）*（上界2-下界2+1）（3）数组的结构数组的所有元素是按一定顺序存储在连续的存储单元的。*一维数组的结构例：Dim stra(3)逻辑结构：(stra(0),stra(1)

40、,stra(2)stra(3)存储结构：按照下标从小到大依次存储*二维数组的结构例：Option base 1 Dim y(3,4)as integer 逻辑结构：y(1,1),y(1,2),y(1,3),y(1,4)y(2,1),y(2,2),y(2,3),y(2,4)y(3,1),y(3,2),y(3,3),y(3,4)存储结构：“按列存放”*三维数组的结构行、列和页组成的三维表。逻辑结构：见书P88 存储结构：“逐页逐列”(4)数组函数及数组语句*返回上、下界函数：上界：UBound(数组名,d）下界：LBound(数组名,d）说明：d 代表维数。省略时表示返回第一维的值。举例：Dim

41、A(5)As Integer,B(2,3 to 5)As Integer a1=LBound(A)a1=UBound(A)b1=LBound(B,1)b2=LBound(B,2)b3=UBound(b,1)b4=UBound(b,2)Print a1;a2;b1;b2;b3;b4 结果：0 5 0 3 2 5 对数组元素依次进行处理，需通过循环结构，循环的次数即数组元素的个数，而知道数组的上下界就知道元素的个数。*Erase 初始化数组语句格式：Erase a1,a2,.功能：对普通数组初始化（按数组类型给元素赋初值），对动态数组 进行存储空间释放。例：Option Base 1 Privat

42、e Sub Form_Click()Dim a(3)As Integer a(1)=1:a(2)=2:a(3)=3 Print a(1),a(2),a(3)Erase a Print a(1),a(2),a(3)End Sub*For Each-Next 数组循环结构格式：For Each Element In 语句块Exit For 语句块Next Element 功能：依次（存储次序）处理每一个数组元数，直到数组结束。说明：Element 是 Variant 变量，它逐个地代表数组中的每一个变量。例：请注意：只能一行或一列输出，不能以矩阵形式输出。参见p90 Private Sub For

43、m_Click()Dim E(2,3)As Integer,V As Variant Dim i As Integer,j As Integer For i=1 To 2 For j=1 To 3 E(i,j)=i*10+j Next j Next i For Each V In E-处理顺序为该数组的存储顺序按列!Print V;Next V End Sub 2、数组的基本操作1)数组元素的赋值（1）用赋值语句给单个数组元素赋值。Dim score(3)as integer score(1)=90:score(2)=80:score(3)=68（2）在循环结构中，用赋值语句逐一给数组元素赋值

44、。Dim a(1 to 6)as integer For i=1 to 6 a(i)=int(99*rnd)+1 一维数组用一层循环结构Next i（3）在循环结构中，利用Inputbox 函数给数组元素赋值。Dim a(1 to 6)as integer For i=1 to 6 a(i)=inputbox(“请输入a(”&I&”)”,”数组赋值”)Next i 演示程序，说明三种赋值的特点：1 只适用于少量元素的数组2 适用于数组元素为随机数或有规律3 适用于指定数组元素的值的情况。（4）Array 赋值函数格式：变体变量名=Array(n1,n2,.)功能：将一个变体型变量创建成为一个一

45、维数组，并包含指定的元素。元素的引用方式与一般数组一样。注意：Array 赋值函数 只能给变体型变量赋值。不能给其他类型的变量及任何类型的数组赋值。2)数组元素的输出用 Print 方法显示在窗体或图片框上赋值给文本框的Text 属性，在文本框中显示调试时，调用Debug 的 Print 方法在“立即”窗口中显示3)数组元素的引用注意：在引用数组元素时，元素的下标一定要在定义的上下界范围之内，否则“数组越界”出错。有关二维数组的常见问题：*转置*求对角线元素之和*求周边元素之和*求上、下三角形元素之和*求鞍点、最大、最小元素*二维数组相乘3.动态数组定义：在程序运行过程中，可重新定义大小的数组

46、。说明语句：Dim 数组名（）as 类型在变量说明部分 ReDim Preserve(维界定义)在可执行语句中Private Sub Form_Click()Dim Pin()As Integer 说明整型的动态数组Pin Dim x as Integer X=Val(Text1.text)ReDim Pin(x)重新说明数组Pin .End Sub 注意：-Redim 是可执行语句，只能出现在过程中-重新定义动态数组时，不能改变数据类型-重定义时，维界定义中可以有变量静态数组与动态数组静态数组：在说明数组时，如果指明了数组的维数和每一维的下标范围，在使用过程中，它的维数和下标范围将不得改变，

47、这样的数组就称为“静态数组”。说明：-如果 Redim 重定义的数组不存在，则相当于一个说明语句-当缺省 Preserve参数时，定义后，原来存储在数组中的数据全部丢失,此时可重新定义数组的维数和各维的上下界。-当有 Preserve参数时，可保留原数组中的数据，但不能改变数组的维数，且只能改变最后一维的维上界。-用 Dim 语句声明过的数组，只是一个空数组，系统并没有给它分配内存空间，此时，不能对数组元素进行存取操作，否则出错。必须用ReDim 语句重新定义其大小，系统才给它分配内存，用户才能对此数组元素进行操作。举例：例 1 Option base 1 Dim dynarry()as in

48、teger Dim x as integer,y as integer Dynarry(1)=1 非法语句，出错Redim dynarry(9)Dynarry(1)=1 给一维数组元素赋值x=2:y=4 Redim dynarry(x,y)Dynarry(1，1)=1 给二维数组元素赋值Erase dynarry Dynarry(1，1)=1 非法语句，出错例 2 Option Explicit Option Base 1 Private Sub Form_Click()Dim i As Integer,a()As Integer ReDim a(4)For i=1 To 4 a(i)=i P

49、rint a(i);Next i Print ReDim Preserve a(6)a(5)=5 a(6)=6 For i=1 To 6 Print a(i);Next i End Sub 如果省去Preserve，会怎样？4、控件数组1）基本概念由一组具有 相同名称 的同类型 控件组成。控件数组中的每个控件都由其下标属性-Index 标识。即：控件数组名（下标）如，Option1(0)、Option1(1)、Option1(2)控件数组中的每一个控件元素可有自己独立的属性设置,但共享同一个事件过程，即无论是控件数组中的哪一个控件响应用户的事件，都触发同一事件过程，但相对于简单控件,事件过程增

50、加了Index 参数，由其指明具体响应的控件。例如：Private Sub Option1_Click(Index As Integer)End Sub 注意：控件数组的第一个下标为0 优点：使用控件数组编写代码简单、易于维护2）建立控件数组（1）创建同名控件在窗体中放置一组控件（同类型），确定某个控件为第一个元素（可将其Index 属性设为0）。按顺序将其它控件的Name（名称）属性改成第一个控件名称（同名）。系统提示“已有一个控件为*，创建一个控件数组吗？”，若第一个控件的Index 属性已设为 0，则不出现提示。（2）复制现存控件在窗体中放置一个控件，设置好相应的属性选定该控件，单击“复