第3章 数组和自定义数据类型.pptVIP

第3章 数组与自定义数据类型 ;3.1 数组;3.1.1 数组分类 ;3.1.2 静态数组声明;1. Dim a(0 to 9) As Integer　等价　Dim a(9) % 默认下界是0,数组下标从0到9(与C语言不一样？) Dim a(9)省略类型时，数组元素类型为Variant Dim a(3,4)% 等价于 Dim a(0 to 3, 0 to 4)% 2. Option Base 1 “通用声明”处声明，强制数组默认下界为1 如：Dim x(4) % 等价Dim a(1 to 4) 3. Erase a 清除数组A的所有元素值,使之恢复成默认值 4. 数组的作用域与变量的作用域相似：过程内、窗体内、全局性;含义 在声明数组时未给出数组的大小(省略括号中的下标) 当要使用它时，随时用ReDim语句重新设置数组大小 但不能重新改变数组的维数和数据类型 格式 ReDim 数组名(下标[，下标2…]) [As 类型] ;例如： 　Dim x( ) As Single … n =Inputbox(“输入n”） ReDim x(n) … 　　　m =Inputbox(“输入m”） 　 ReDim Preserve x(m) 　重新定义时，保留原数组的值 … ;3.1.4 与数组操作有关的几个函数;例如 　　 Dim a() ’ Variant类型的动态数组a A=array(1,3,5) Dim b ’变体类型的变量a b=array(1,3,5) Dim c() as integer c=array(1,3,5) ‘出现错误？ 2、下界和上界函数 For i=LBound(a) to UBound(a)　 　　print a(i) Next i ;3.Split函数;例如： Dim x, s$ s = a,b,c,d,e 　　x = Split(s, ,) For i = 0 To UBound(x) Print x(i) Next I ;例1：输入一批数据后进行排序输出(演示）;关键点：;3.2 控件数组 ;控件数组的建立方法;例2：简单的门诊计价收费系统界面(演示);3.3 pictureBox控件;事件： Click、DblClick 方法： Cls、Print 支持图像类型： .bmp, .ico (尺寸：32*32)，.wmf(向量文件), .jpg, .gif ;3.4 Image ;例3：复杂的门诊计价收费系统界面（演示);小结;3.5 List Boxes;MultiSelect 控件是否允许多选 Selected:逻辑数组, Selected(i)的值为True表示第i项被选中 Sorted　为true时，条目以ascii码排序 Text　 当前所选中条目的文本内容 ;ListBox 示例：列表框各主要属性的值;2. 方法 AddItem 对象.AddItem 条目 [, 索引] 其中条目必须是字符串表达式 RemoveItem 对象.RemoveItem 索引 Clear 对象.Clear ;3.事件;3.6 Combo Boxes;类型 Style 输入 下拉式组合框 0 能 简单组合框 1 能 下拉式列表框 2 不能 ;事件:Click,DClick 方法： AddItem ，Clear，RemoveItem， 例如： cboExample.AddItem This is an added item cboExample.RemoveItem 4 cboExample.Clear ;例4：ListBox在工程中的应用(演示);例5：ComboBox 在工程中的应用(演示);1、特点;Type 类型名 字段1 As 类型 字段1 As 类型 ……  字段1 As 类型End Type;自定义类型必须先说明变量，再引用;例6：学生名单录入 (演示）;模块的使用:选中“工程”，使用鼠标右键?“添加”?“添加模块” 自定义类型 动态数组 控件：OptionButton, CheckBox, comboBox, CheckBox控件