文件名稱:
ByVal.asp
ByRef.asp
具體代碼:
<%
Sub TestMain()
Dim A : A=5
Call TestBy(A)
Response.write A
End Sub
Sub TestBy(ByVal T)
T=T+1
End sub
call TestMain()
%>
<%
Sub TestMain()
Dim A : A=5
Call TestBy(A)
Response.write A
End Sub
Sub TestBy(ByRef T)
T=T+1
End sub
call TestMain()
%>
運行結果:
5
6
結 論:
注意:子程序TestBy(ByVal T)中T變量聲明方式是ByVal
運行結果子程序沒有影響到A的值
注意:子程序TestBy(ByRef T)中T變量的聲明方式是ByRef
運行結果A的值通過子程序發生了改變
看完了，上面的比較就知道說明意思了吧。
