网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的范文：

　

标题 vbs(asp) ByVal ByRef函数调用使用说明
范文
    ByVal 传送参数内存的一个拷贝给被调用者。也就是说，栈中压入的直接就是所传的值。 ByRef 传送参数内存的实际地址给被调用者。也就是说，栈中压入的是实际内容的地址。被调用者可以直接更改该地址中的内容。
    1、ByVal传值：一种将参数值而不是将地址传递给过程的方式，这就使过程访问到变量的复本。结果，过程不可改变变量的真正值。
    2、ByRef传值：一种将参数地址而不是将值传递给过程的方式，这就使过程访问到实际的变量。结果，过程可改变变量的真正值。除非另作说明，否则按地址传递参数。
    3、系统默认的是ByRef传值。
    例子：
    代码如下:
    <SCRIPT LANGUAGE="vbScript">
    dim a
    a=0
    document.write "a=0"
    document.write "<br/>sub change(byref ar)<br/>"
    change a
    document.write a
    a=0
    document.write "<br/>sub change2(ByVal ar)<br/>"
    change2 a
    document.write a
    a=0
    document.write "<br/>sub change3( ar)<br/>"
    change3 a
    document.write a
    a=0
    document.write "<br/>function change4(byref ar)<br/>"
    change4 a
    document.write a
    a=0
    document.write "<br/>function change5(ByVal ar)<br/>"
    change5 a
    document.write a
    a=0
    document.write "<br/>function change6( ar)<br/>"
    change6 a
    document.write a
    a=0
    sub change(byref ar)
    ar=111
    end sub
    sub change2(ByVal ar)
    ar=222
    end sub
    sub change3( ar)
    ar=333
    end sub
    function change4(byref ar)
    ar=444
    end function
    function change5(ByVal ar)
    ar=555
    end function
    function change6( ar)
    ar=666
    end function
    </SCRIPT>
    =======================
    结果：
    a=0
    sub change(byref ar)
    111
    sub change2(ByVal ar)
    0
    sub change3( ar)
    333
    function change4(byref ar)
    444
    function change5(ByVal ar)
    0
    function change6( ar)
    666
    说明vbs默认是byRef，这点和VB一样， 按地址。
    再给出一个小例子，大家运行看效果！
    代码如下:
    <%
    Dim i,j,p,m
    i = 10
    j = 12
    Response.Write i&"******"&j&"<br>"
    Call Fun2 (i,j)
    Response.Write i&"******"&j&"<br>"
    i = 10
    j = 12
    Call Fun (i,j)
    Response.Write i&"*******"&j&"<br>"
    Function Fun2 (a,b)
    a = 5
    b = 6
    Fun2 = 0
    End Function
    Function Fun (ByVal a,ByRef b)
    a = 5
    b = 6
    Fun = 0
    End Function
    %>
    通过上面的例子你可以发现：
    1、ByVal传值没有改变全局变量的值。
    2、ByRef传值改变了全局变量的值。
    3、系统默认的是ByRef传值。
    至于应该在什么时候使用吗？这就要看自己的实际情况了！
    ByVal 传送参数内存的一个拷贝给被调用者。也就是说，栈中压入的直接就是所传的值。
    ByRef 传送参数内存的实际地址给被调用者。也就是说，栈中压入的是实际内容的地址。被调用者可以直接更改该地址中的内容。
    ByVal是传递值 源数据不会被修改
    你可以把这个值当作自己的局部变量来使用
    ByRef是传递地址 ， 源数据可能被修改
    你对这个变量的操作将对你传入的那个变量产生影响，就像指针的感觉
    vb6的说明
    啥也不说了，接题：
    代码如下:
    Function Test(a)
    a = a + 1
    End Function
    c = 1
    '------------------------------------
    '问题：
    ' 请说出分别调用下面四种方法的结果?
    '------------------------------------
    '方法一
    Test c
    '方法二
    'Test (c)
    '方法三
    'Test (c+1)
    '方法四
    'Call Test(c)
    msgbox c
    正确答案：分别为：2 , 1 , 1 , 2
    你全答对了没？全答对了你可以直接Return了，没答对的话继续往下看。
    追溯
    几乎所有编程语言的函数传参都有传值和传引用之分，我们的VB老兄也不例外，而且，她选择了传引用作为其默认方式，甚者，她对所有变量类型不加挑剔，全部默认采用传引用的方式，包括整型变量(int)。这也是华山论剑败北的最根本原因。
    你可以在参数前使用ByVal(传值)和ByRef(传引用)关键字指明参数传递的方式：
    '传值方式，c值不变
    代码如下:
    Function Test(ByVal a)
    a = a + 1
    End Function
    c = 1
    Test c
    'c = 1
    '传值方式，c值不变
    代码如下:
    Function Test(ByRef a)
    a = a + 1
    End Function
    c = 1
    Test c
    'c = 2
    领悟
    通常，VB6的Function函数调用方法有两种：
    Func Params
    如方法一：Test c
    Call Func(Params)
    如方法四：Call Test(c)
    因此，论剑中的方法一和方法四实质上是一样的，参数c都是通过默认的传引用方式传递，执行完函数Test后，c的值会随之改变。因此方法一和方法四的结果为：2
    然而，江湖中似乎还流传着这样一种调用方法：
    Func(Expression)
    如方法二：Test(c) 和 方法三：Test(c+1)
    注 意到没有，括号中的内容不是Params，而是Expression，是一个表达式，而表达式的计算结果会被保存到一个临时变量中传入函数体，函数调用完毕 后临时变量也随之销毁。因此，调用方法二时，表达式(c)的计算结果为1，保存到了一个临时变量传入函数Test中，函数执行完成后，原来的c值并不发生 改变。同理，方法三的调用更加显得直观一些，(c+1)的表达式运算结果被保存到了一个临时变量传入Test，原来的c值并不发送改变。所以，方法二和方 法三的结果为：1
    出师
    总结如下：
    VB6和VBS中的函数参数默认是ByRef类型的。
    Test(c)方法调用时，VB会认为你传递的不是一个变量，而是一个表达式：(c) ，这个表达式运算结果，虽然与c值相同，但却是保存在一个临时变量中，这个临时变量的改变不会影响到原来的变量c
随便看

　

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板，是学习及工作的有利工具。

　

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间：2025/5/15 7:56:46