access二级中VBA课嫉宁辅导.ppt

Access程序设计;总 目 录;第8章 模块与VBA程序设计 ;知识网络图 ;【例8.1】用户登录窗体中“退出”按钮VBA代码 (1)查看“退出”命令按钮事件 (2)查看事件代码 ;单击进入代码编写;Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd.;说明 ①事件过程 Private Sub Command7_Click() ….. End Sub Sub表示定义一个过程。 End Sub表示该过程的结尾处。 Command7_Click()表示过程名称，在access中，过程名为：控件名称_事件名称()，过程名后必须有一个( )。Command7为“退出”按钮的名称，Click为单击事件。 ②事件过程代码 在Private Sub Command7_Click()和End Sub中间的几行代码为实现“退出”功能的VBA代码，实现退出的具体代码为DoCmd.Quit，其他代码用于错误处理。这些代码将在稍后详细介绍其作用。 ;8.1.1 窗体事件 事件(event)：是发生在控件对象上且可以辨认的动作，如像单击鼠标或按下某键等，并且可以写某些代码来响应此述动作。 对事件的响应一般有两种方法，一种方法是使用宏来响应控件对象事件，另一种方法是编写VBA代码过程。 ;【例8.2】如果使用宏来响应控件对象事件，比如同样创建一个可退出access程序的按钮，可采用以下步骤： （1）创建一个宏，宏名为“退出系统”，操作选择“Quit”。 （2）创建一个窗体。在窗体上添加一个命令按钮 . （3）打开命令按钮属性窗口，切换到“事件”选项页，单击其单击事件下拉框，在弹出的列表中选择“退出系统”宏，如图8.6 ;Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd.;表8-1 部分事件过程; 命令按钮; 文本框;VBA编程环境（VBE） ;模块;将宏转化为模块 ;创建模块 ;VBA编程基础;数据类型 ;变量 ;常量 ;数组 ;二维数组;运算符和表达式 ;运算符和表达式 ;运算符和表达式 ;表达式案例;表8-6 表达式举例 ;8.4 系统常用函数及对象;1．数字函数 （1）求绝对值 格式：Abs(数值) 功能：返回参数的绝对值 Abs(-10) 结果：10 （2）取整部分 格式：int(数值) 功能：返回不大于参数的最大整数部分 Int(13.4) 结果：13 Int(13.6) 结果：13 Int(-13.6) 结果：-14 （3）取整数部分函数 格式：fix(数值) 功能：参数的整数部分 Fix(13.4) 结果：13 Fix(13.6) 结果：13 Fix(-13.6) 结果：-13 4）随机函数 格式：rnd(数值) 功能：产生一个0~1的随机数; 2．日期函数 （1）当前日期函数 格式：date() 功能：返回系统当前日期 （2）当前时间函数 格式：time() 功能：返回系统当前时间 （3）当前日期时间函数 格式：now() 功能：返回系统的日期和时间 （4）取出年份函数 格式：year(日期) 功能：取出日期中的年份，整型 Year(date()) 结果：返回系统日期中的年份 （5）取出日月份函数 格式：month(日期) 功能：取出括号日期中月份，整型。 Month(date()) 结果：返回系统日期中的月份。;3．字符串函数 （1）长度函数 格式：len(字符串) 功能：返回括号中字符串的长度，即字符串中字符的个数。 Len(welcome to Beijing) 结果：18 说明：包含2个空格。 （2）转换大小写 格式：ucase(字符串)、 lcase（字符串） 功能：将字符串全部转换为大小写字母 Ucase(Beijing ) 结果：BEIJING （4）左边截取 格式：left（字符串，整数N） 功能：从字符串左边截取N个字符 Left(beijing2008 ,7) 结果：beijing （5）右边截取 格式：right（字符串，整数N） 功能：从字符串右边截取N个字符。 Right(beijing2008,4) 结果：2008 （6）中间截取字符串 格式：mid（字符串，开始位置N1，截取长度N2） 功能：从字符串左边第