6.5.2-VBA语言参数传递（教案）-《Access数据库应用基础》同步教学（科学出版社）

教案 编号：PTzZ-300 流水号：19 （首页）共 4页 课程 《Access数据库应用基础》 一体化 理论 章节（课题）及内容 VBA语言参数传递 班级日期 中职 2024.05 授课方式 讲授与任务驱动相结合 课时 1 作业题数 1 拟用时间 40分钟 教学目标 使学生理解以下理论知识： · 理解VBA语言中参数传递的概念。 · 掌握按值传递（ByVal）和按地址传递（ByRef）的方法。 · 熟悉数组参数传递的特点。 教学资源准备 多媒体设备 课本教材 学生练习素材 教学重点 · 参数传递的基本概念。 · 按值传递和按地址传递的区别。 教学难点 · 理解参数传递过程中变量的变化。 · 掌握复杂数据类型的参数传递。 教学方法 讲授法、任务驱动法、演示法、体验探究法等。 · 案例分析法：通过实际案例，引导学生理解VBA参数传递的应用。 · 任务驱动法：布置具体任务，让学生在实践中掌握知识。 授课教师： 审阅签名： 教学过程 教学活动内容 时间分配教学方法 课前导入 · 回顾VBA基础知识，如变量、数据类型、控制结构等。 · 介绍参数传递的重要性和应用场景 2分钟 讲授新课 练习指导 在VBA（Visual Basic for Applications）语言中，参数传递是一种将数据从一个过程传递到另一个过程的方法 参数传递的基本概念： 1. 形式参数（Formal Parameter）：在过程定义中声明的参数，用于接收实际参数的值。形式参数在过程内部使用。 2. 实际参数（Actual Parameter）：在调用过程时传递给形式参数的值。实际参数可以是常量、变量、表达式等。 3. 参数传递类型：VBA中有两种参数传递类型：按值传递（ByVal）和按地址传递（ByRef）。 - 按值传递（ByVal）：将实际参数的值传递给过程中的形式参数。在过程中对形式参数的修改不会影响实际参数。 - 按地址传递（ByRef）：将实际参数的内存地址传递给过程中的形式参数。在过程中对形式参数的修改会影响实际参数。 参数传递的示例： ```vba ' 定义一个Sub过程，接收两个参数 Sub AddNumbers(ByVal a As Integer, ByRef b As Integer) Dim sum As Integer sum = a + b b = sum ' 修改实际参数的值 Debug.Print "Sum: " & sum End Sub ' 调用AddNumbers过程 Dim num1 As Integer, num2 As Integer num1 = 5 num2 = 10 Call AddNumbers(num1, num2) Debug.Print "Updated num2: " & num2 ``` 在这个示例中，我们定义了一个名为AddNumbers的Sub过程，它接收两个参数：一个按值传递的整数a和一个按地址传递的整数b。在过程内部，我们计算a和b的和，并将结果赋值给b。当我们调用AddNumbers过程时，传递给过程的实际参数num1和num2的值分别为5和10。在过程内部，我们修改了实际参数num2的值，使其等于a和b的和。最后，我们输出修改后的num2值。 总结：理解VBA中参数传递的概念，需要了解形式参数、实际参数、按值传递和按地址传递等方面的知识。掌握这些知识，有助于编写更加高效、可维护的VBA程序。 在VBA（Visual Basic for Applications）语言中，参数传递可以通过按值传递（ByVal）和按地址传递（ByRef）两种方式实现 1. 按值传递（ByVal）： 按值传递是将实际参数的值传递给过程中的形式参数。在过程中对形式参数的修改不会影响实际参数。这种传递方式适用于基本数据类型（如整数、浮点数、布尔值等）和简单的数据结构（如数组）。 示例： ```vba Sub AddNumbersByVal(ByVal a As Integer, ByVal b As Integer) Dim sum As Integer sum = a + b Debug.Print "Sum: " & sum End Sub Dim num1 As Integer, num2 As Integer num1 = 5 num2 = 10 Call AddNumbersByVal(num1, num2) ``` 在这个示例中，我们定义了一个名为AddNumbe