没明白这个disp的意义
(call by reference)
dim a as string,n as integer
a="visual":n=5
disp a,n
.
.
.
sub disp(moji as string,num as integer)
.
.
.
moji="vb"
num=10
end sub
这段code一点没明白 书中还画了箭头 a指向moji ,n 指向num第二个 code(call by value)
disp a,n
.
.
.
sub disp(byval moji as string,byval num as integer)
.
.
.
moji="vb"
num=10
这回a指向byval,n指向byval。disp没明白 很糊涂
(call by reference)
dim a as string,n as integer
a="visual":n=5
disp a,n
.
.
.
sub disp(moji as string,num as integer)
.
.
.
moji="vb"
num=10
end sub
这段code一点没明白 书中还画了箭头 a指向moji ,n 指向num第二个 code(call by value)
disp a,n
.
.
.
sub disp(byval moji as string,byval num as integer)
.
.
.
moji="vb"
num=10
这回a指向byval,n指向byval。disp没明白 很糊涂
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
http://feiyun0112.cnblogs.com/
第一个示例传地址调用第二个示例传数据调用
disp是一个自定义的子过程