Visual Basic程序设计第8章过程与作用域 .pptVIP

2．实参 实参是主调过程中调用过程时所给出的具体参数，这些参数是有确定值的，它们可以是直接常量或有值变量、表达式、数组中的某一个元素等。形参表和实参表都以括号“( )”括住，其表中的多个变量以逗号“，”隔开，变量名可以不同，在传递时形参和实参的个数必须相同，类型必须相容，传递值时一一对应。 以8.4.4函数过程应用实例为例，形参和实参的对应关系为： 形参 Private Function Find(a( ) As Integer, x As Integer) As Integer 实参 find_flag = Find(a( ), x) 定义Function Find时，定义了Find的两个形式参数数组a( )和x。调用Find时需要两个参数，第一参数是一个数组，它的值将对应传递给形式参数数组a( )，第二个参数是一个整数，它的值将对应传递给形式参数x。注意形参和实参是按照位置对应关系传递而不是参数的名称。 8.5.2传址与传值方式 形参和实参之间的数据传递方式有两种：按地址传递和按值传递。 1．按地址传递 按地址传递参数，是指被调用的过程的形式参数并不建立自己的存储单元，而是与主调过程共享同一存储单元，因此当被调用过程的形参值发生变化时，主调过程中的实参值也将发生同样的变化。在定义按地址传递时，需要在形参前面加上关键字ByRef，若省略VB也默认参数传递方式为按地址传递。按地址传递时，若实参是表达式或者用括号括住，形参的值将不能在过程调用结束时反向传递给实参。 2．按值传递 值传递则是主调过程的实际参数与被调用过程的形式参数各有自己的存储单元，调用过程时主调过程的实参值被复制到被调用过程的形参存储单元中，这样以后被调用过程形参的变化与主调过程的实参不再发生任何联系。在定义按值传递时，需要在形参前面加上关键字ByVal。 3．两种参数传递方式的比较实例 下面通过一个实例，来对比一下两种参数传递方式的不同效果。本实例中， 窗体给出同一个过程按两种不同方式进行参数传递的代码，用户输入一个数后，分别单击参数按地址传递和参数按值传递按钮，可以对比看出过程执行后参数x的值是不同的。 应用程序设计步骤如下： ①建立应用程序用户界面和设置对象属性。 选择“新建工程”，进入窗体设计器。设计好的程序用户界面如图8-7所示。 图8-7 两种参数传递方式的比较实例设计界面 ②编写代码。 在通用段中定义half过程按两种不同方式进行参数传递的代码： Private Sub half1(ByRef x As Integer) x = x / 2 End Sub Private Sub half2(ByVal x As Integer) x = x / 2 End Sub 编写命令按钮Command1（参数按地址传递按钮）的Click事件代码如下： Private Sub Command1_Click() Dim x As Integer x = Val(Me.Text1.Text) Call half1(x) Me.Text4.Text = x End Sub 编写命令按钮Command2（参数按值传递按钮）的Click事件 代码如下： Private Sub Command2_Click() Dim x As Integer x = Val(Me.Text1.Text) Call half2(x) Me.Text4.Text = x End Sub 程序执行后，输入偶数8，单击参数按地址传递按钮后，输出4，单击参数按值传递按钮后，输出8，如图8-8所示。 过程调用时，如果实参使用括号括住，则参数的传递方式为按值传递。 图8-8 两种参数传递方式的比较实例设计界面 返回 8.5.3 传递数组 在过程的调用中，数组值的传递有其特殊性： (1)数组只能按地址传递，不能按值传递。 (2)在主调过程的实参表和被调用过程的形参表中无需说明数组的维数。 (3)若传递数组中的某一个元素，则在Call语句中直接写上该数组的元素，例如：Call find(a(