Visual Basic.NET程序设计-夏敏捷及源代码 第6章.pptVIP

6.3.2 传址与传值 2．传值 传值（ByVal）方式在调用过程时，将实参的值复制给形参。在被调过程中，形参拥有自己的内存地址，即使被调过程与主调过程中使用了相同的变量名，在内存中也对应于不同的地址单元。因此，对形参的任何操作不会影响到实参，其数据传递必然是单向的。具体分析如图6-14所示。 6.3.2 传址与传值 【例6.11】编写一个Function过程，用来求任意两个整数的最大公约数。调用该过程求二个数的最大公约数及最小公倍数。 分析：求两个整数的最小公倍数的公式为：将两数相乘除以它们的最大公约数。 求最大公约数的Function过程如下。 Public Function HCF(ByVal X As Long, ByVal Y As Long) As Long Dim R As Long Do R = X Mod Y If R = 0 Then HCF = Y : Exit Do Else X = Y : Y = R End If Loop End Function 6.3.2 传址与传值 求最大公约数和最小公倍数的主调过程如下。 Private Sub