VB编码基础复习

1、复习,考试题型,单选题（30分，每题1分） 填空题（50分，每空2分） 编程题（20分，每题10分,编码基础,VB代码不区分字母的大小写 一行可书写几句语句,之间用冒号分隔; 一句语句可分若干行书写,用续行符（空格下划线）连接 Rem开始 或 单撇,VB常用数据类型,变量和常量的命名规则,变量：在程序运行中其存储的值可以改变。 常量：在程序运行中其值不可以改变。 以字母或汉字开头，后可跟字母、数字或下划线组成，长度小于等于40个字符； 不能使用VB中的关键字； VB中不区分变量名的大小写 例如：1)a bc 2)print_65 3)12bc 4)x-y 5)x%y 6)abs 7)mn% 8

2、)int,变量声明,Dim 变量名 AS 类型 Dim iMark As integer , sTotal As single Dim iItem% 注意: 在通用声明处加 Option Explicit 语句来强制显式声明变量,常量声明,Const 常量名 AS 类型 = 表达式 例 Const MAX=100 Const MIN As Integer =省略下界为0 ,必须为常数 每一维大小: 上界下界+1 数组大小: 每一维大小的乘积 例：Dim mark(1 to 100) As Integer Dim a( 0 To 3， 0 To 4) As Long 共有 45个元素 等价于:

3、Dim a(3， 4) As Long,注意： 1. 下界缺省为0 ,也可在重新定义数组的下界。例如： Option Base 1 2. 在数组声明中的下标说明了数组的整体,即每一维的大小；而在程序其他地方出现的下标表示数组中的一个元素。 两者写法形式相同，但意义不同。 例如： Dim x(10) As Integer 声明了x数组有11个元素 x(10)=100 对x(10)这个数组元素赋值,动态数组及声明,在程序执行时分配存储空间。 方法： (1)在过程外使用Dim、Private或Public语句声明括号内为空的数组 (2)在过程中用ReDim语句指明该数组的大小 Dim sArray(

4、 ) As Single Sub Form_Load( ) ReDim sArray(4，8) End Sub,注意： (1)ReDim中的下标可以是常量,也可以是有确定值的变量. (2)在过程中可多次使用ReDim改变数组的大小，或维数. (3)每次用ReDim会使原数组的值丢失，可以在ReDim语句后加Preserve参数来保留数组中的数据,数组元素的输入、输出,1)用循环 For i = 1 To 10 iA(i)=0：Print iA(i); ; Next i (2) Array函数 Dim ib As Variant ib = Array(abc, def, 67) For i =

5、0 To UBound(ib) Print ib(i); ; Next i,注意： 利用Array对数组各元素赋值，声明的数组是可调数组或连圆括号都可省，并且其类型只能是Variant。 数组的下阶为零，上界由Array函数括号内的参数个数可决定，也可通过函数Ubound获得,数组的应用,求最大值最小值 数组的查找、插入和删除 排序：冒泡排序和选择排序,过程,三种自定义过程 子过程（Sub Procedure） Sub过程没有返回值 函数过程（Function Procedure） Function过程返回一个值 属性过程（Property Procedure,自定义函数过程定义,Functi

6、on 函数名 (参数列表) As 数据类型 函数名=表达式 End Function 特点：函数名有值，有类型，在过程体内至少赋值一次,函数名（实际参数列表） 注意：函数在定义和使用时，无论是否有参数，圆括号一定不能省。 特点：不能独立存在，必须参加表达式的运算,Function过程调用,自定义子过程的定义,格式： Sub 子过程名(形式参数表) 过程体 End Sub 特点：子过程名无值，无类型,自定义子过程的调用,格式1 子过程名 实际参数列表 格式2 Call 子过程名(实际参数列表) 特点：一句独立的语句 注意：格式1中的实际参数列表无需圆括号,注意： (1)参数列表称为实参或实元，它

7、必须与形参保持个数相同，位置与类型一一对应。 (2)当参数是数组时，形参与实参在参数声明时应省略其维数，但括号不能省。 (3)调用子过程的形式有两种，用Call关键字时，实参必须加圆括号括起，反之则全无,参数传递,指主调过程的实参传递给被调过程的形参。 传址：形参得到的是实参的地址，当形参值的改变同时也改变实参的值。其形式参数前加ByRef关键字界定或缺省。 传值：形参得到的是实参的值，形参值的改变不会影响实参的值。其形式参数前加ByVal关键字界定 实参为数组时为传址，实参为表达式时为传值,Sub Add(x%, y%) x = x + 2 y = y + 3 Print x=; x, y=

8、; y End Sub Private Sub Command1_Click() a% = 10: b% = 20 Call Add(a + 1, b) Print a=; a, b=; b End Sub,1.递归的概念 用自身的结构来描述自身就称为“递归”。例如对阶乘的定义,2. 递归过程 过程在自身定义的内部调用自己,编fac(n)=n! 的递归函数 Function fac(n As Integer) As Integer If n = 1 Then fac = 1 Else fac = n * fac(n - 1) End If End Function,控件基本的属性,Name名称

9、 : 所有控件对象都具有的属性 Enabled： 控件是否可操作. 当设置为false时,呈暗淡色,禁止用户进行操作. Visible属性： 控件是否可见.当设置为false时, 用户看不到，但控件本身存在,Height、Width、Top和Left属性,Caption 标题属性 该属性决定了控件上显示的内容,常用控件,标签 Label 用于显示文本(输出)信息，不能作为输入信息的界面。标签是没有焦点的。 文本框 TextBox 是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。 命令按钮CommandButton 接受用户输入的命令,文本框（TextBox,基本属性 Text : 正文

10、内容 Maxlength: 设置正文的最多字符个数 MultiLine: 是否为多行,默认一行. FALSE ScrollBars: 当MultiLine为True时,该属性才有效,表示滚动条的形式 PassWord :口令字符； Text属性返回输入的数据，屏幕显示该字符 SelStart，SelLength，SelText : 选中文本的起始、长度、内容 Locked：指定文本控件是否可被编辑,常用事件 Change : 当改变文本框的Text属性时会引发该事件. KeyPress(KeyAscii As Integer): 文本框的按键事件，常用于判断是否按了回车键（KeyAscii 为

11、13,按回车键） 常用方法 对象.SetFocus: 是把光标移到指定的文本框对象中,单选钮和检查框,属性 Caption：文本标题。 Alignment 0：控件钮在左边，标题显示在右边。 1：控件钮在右边，标题显示在左边。 Value 检查框 单选钮 0-Unchecked：未被选定 True：选定 1-Checked：选定 False：未选定 2-Grayed：灰色，禁止选择,框架(Frame,框架内控件的创建方法： 方法1：单击工具箱上的工具，然后用出现的“+”指针，在框架中适当位置拖拉出适当大小的控件。不能使用双击工具箱上图标的自动方式。 方法2：将控件“剪切”到剪贴板，然后粘贴到框

12、架,框架,设Caption为 字体,列表框,List1,列表框各主要属性的值： List1.ListIndex = 3 (下标从0开始的) List1. ListCount = 5 List1. Selected(3) = True，其余为False。 List1. Sorted = False，没有排序。 List1. Text 为 “cox” ， 与List1. List(List1. ListIndex)相等,1. 基本属性 (P：可在程序中设置或引用，D：可在设计状态设置。) List ：P D 字符型数组，存放列表框的项目，下标是从0开始。 ListIndex：P 选中的项目的序号，

13、没有项目被选定时为-1 ListCount：P 项目的数量，ListCount-1是最后一项的下标。 Sorted：D True：按字母顺序排列。 False：按加入先后顺序排列。 Text：P 列表项中被选定的内容， List 1.List(List 1.ListIndex) = List1.Text,2. 列表框的特有属性 Selected：P 逻辑数组。 Selected(i)的值为True表示第i+1项被选中。 MultiSelect 0-None：禁止多项选择。 1-Simple：简单多项选择。 2-Extended：扩展多项选择,3. 方法 AddItem 对象.AddItem i

14、tem , index RemoveItem 对象.RemoveItem index Clear 对象.Clear,4. 事件 Click、DblClick。 一般不需要编写Click事件过程。 通常在单击命令按钮或发生DblClick事件时才读取Text属性,列表框各主要属性的值： List1.ListIndex = 0 List1. ListCount = 8 List1. Selected(3) = True 其余为False。 List1. Sorted = False List1. Text 为 “李宁,组合框,下拉式组合框,下拉式列表框,简单组合框,2. 组合框的特有属性 Styl

15、e,滚动条控件（HScrollBar和 VScrollBar,属性 Value：滑块所处位置代表的值 Max：滑块处于最右（下）端时的值 Min： 滑块处于最左（上）端时的值 LargeChange：单击滚动条空白处，滑块移动的增量。 SmallChange：单击滚动条两端箭头时，滑块移动的增量,滚动条控件,菜单项名称必须是唯一的 分隔条及热键的设置,菜单,文件及其种类,文件是记录的集合。 VB按读写方式的三类文件： 顺序文件 随机文件 二进制文件,顺序文件,从第一条到最后一条记录顺序读写 文本文件每一行为一条记录 写文件的三步骤：打开写入关闭 读文件的三步骤：打开读出关闭,打开文件,Open “文件名” For 模式 As #文件号 Len=记录长度 说明： (1) 三种“模式”： Output 重写 Append 追加记录 Input 读 （外存内存） (2) 文件号是1511之间的整数,写文件,格式1 Print #文件号 ，输出列表 格式2 Write # 文件号，输出列表 Write为紧凑格式，数据项间自动加“，”，字符串加双引