《基础复习3》由会员分享，可在线阅读，更多相关《基础复习3（15页珍藏版）》请在金锄头文库上搜索。
1、第五章第五章 常用控常用控 件件 标准控件标准控件 ：扩展名为：扩展名为EXEEXE的文件，标准控件总是的文件，标准控件总是 出现在工具箱中。出现在工具箱中。 TextText、label label 、commandcommand、timertimer、optionoption、checkboxcheckbox、 frameframe ActiveXActiveX控件控件 ： 早期早期VBVB版本提供的控件、仅在专业版本和企业版本的版本提供的控件、仅在专业版本和企业版本的VBVB 中提供的控件和由第三方提供的中提供的控件和由第三方提供的ActiveXActiveX控件。扩展名控件。扩展名 为
2、为OCXOCX的独立文件的独立文件 。 在程序中使用在程序中使用ActiveXActiveX控件，需要通过控件，需要通过“ “部件部件” ”对话框的对话框的“ “控控 件件” ”选项卡把选定的控件添加到工具箱。选项卡把选定的控件添加到工具箱。 Ado data controlAdo data control、datagriddatagrid 第五章 常用控件 复选框复选框 ：复选框（：复选框（CheckBoxCheckBox）也叫选择框、检）也叫选择框、检 查框，用于在两种状态中选择其中一种。查框，用于在两种状态中选择其中一种。 常用属性常用属性ValueValue： 值为值为0 0时（缺省设
3、置），表示复选框未被选中；值为时（缺省设置），表示复选框未被选中；值为1 1 时，表示被选中；时，表示被选中； 当值为当值为2 2时，表示复选框不可使用时，表示复选框不可使用( (灰色灰色) )。 事件：复选框主要接收事件：复选框主要接收ClickClick事件。事件。 复选框、单选按钮和框架 单选按钮单选按钮 ：（：（OptionButtonOptionButton） 常用属性常用属性ValueValue属性：属性： 当该单选按钮被选中，其当该单选按钮被选中，其ValueValue属性值为属性值为 TrueTrue，同组其他单选按钮的，同组其他单选按钮的ValueValue属性值属性值 全部
4、为全部为FalseFalse。 事件：事件：ClickClick事件。事件。 复选框、单选按钮和框架 框架：框架：框架控件框架控件(Frame) (Frame) 是一个容器，用于是一个容器，用于 将窗体上的对象分组，又可以让其中的控件将窗体上的对象分组，又可以让其中的控件 成为一个整体。成为一个整体。 常用属性常用属性 EnabledEnabled属性：属性： 如果其值为如果其值为TrueTrue，则框架内的对象是，则框架内的对象是“ “活动活动” ”的，否的，否 则其标题会变灰，框架内的对象被屏蔽，不能操则其标题会变灰，框架内的对象被屏蔽，不能操 作。作。 复选框、单选按钮和框架 VBVB利
5、用系统内部的计时器计时。利用系统内部的计时器计时。 常用属性常用属性 IntervalInterval：该属性以毫秒为单位来设置计时器触：该属性以毫秒为单位来设置计时器触 发事件的周期，如果把发事件的周期，如果把IntervalInterval属性值设置为属性值设置为 10001000，则表明每秒钟发生一个计时器事件。，则表明每秒钟发生一个计时器事件。 EnabledEnabled：用来确定计时器能否对事件做出反应：用来确定计时器能否对事件做出反应 。 常用事件常用事件TimerTimer：每当经过由：每当经过由IntervalInterval属性设置的时属性设置的时 间值，就触发一次间值，就
6、触发一次TimerTimer事件。事件。 计时器 数组 6.16.1数组的定义数组的定义 Dim Dim 数组名数组名( (下标下标1 1范围范围 , , 下标下标2 2范围范围 )As )As 数据类型数据类型 vv例如：例如：Dim a%(5)Dim a%(5) vv定义后，自动赋初值定义后，自动赋初值 1.1.数值型数组，每个元素数值型数组，每个元素0 0 2.2.字符型数组，每个元素字符型数组，每个元素空字符串空字符串 3.3.如果执行了语句：如果执行了语句：a(3)=100a(3)=100 例如：例如： Dim a(1 To 5) As IntegerDim a(1 To 5) As
7、 Integer Dim b%(5,4) Dim b%(5,4) 例如：例如： Option Base 1Option Base 1 Dim a(5) As IntegerDim a(5) As Integer a (0)a(1)a(2)a(3)a(4)a(5) 00010000 For i = 0 To 5For i = 0 To 5 a(i)=2*i+1 a(i)=2*i+1 Next INext I For i = 0 To 5For i = 0 To 5 a(i)=inputbox(“ a(i)=inputbox(“请输入第请输入第”+i+”+i+”个数个数”)”) Next INex
8、t I 数组的赋值 6.2 6.2 数组的操作数组的操作 例例6.2.2 6.2.2 用用For EachNextFor EachNext语句输出数组语句输出数组a a的所有元素。的所有元素。 Private Sub Form_Click()Private Sub Form_Click() Dim a(5) As IntegerDim a(5) As Integer a(0) = 1: a(1) = 5: a(2) = 6: a(3) = 8: a(4) = 9: a(5) = 10a(0) = 1: a(1) = 5: a(2) = 6: a(3) = 8: a(4) = 9: a(5) =
9、 10 For Each x In aFor Each x In a Print x Print x Next xNext x End SubEnd Sub For Each 元素 in 数组名 循环体 Next For i = 0 To 5For i = 0 To 5 Print a(i) Print a(i) Next iNext i 第7章 函数、子过程、参数传 递 子过程与函数的区别 Sub 过程名(形式参数表) End Sub Sub过程的调用 ： 格式1： Call 过程名(参数列表 格式2： 过程名 参数列表 Function 过程名(形式参数列表)As 类型 过程名= End Function 格式1： 函数过程名（） 格式2： Call 函数过程名（） 如果不需要Function过程的返回值，可 以采用此种调用方式 参数传递 (1)按值传递 定义过程时， 使用ByVal关键 字指出该参数 是按值传递的 。 (2)按地址传递 定义过程时，缺省或 使用ByRef关键字指出 参数是按地址传递的 。 模块 变量分类 Public a as integer Private b as string*10 Sub test1() Dim x as integer End sub Sub test2() Dim y as string End sub
