for i=0 to 3
dim a
c a,i
msgbox(a)
next
function c(a,i)
if i=2 then
a=3
end if
end function
你虽然在for里面dim了,但a的值还是会保存的,
你有两种方法,第一是声明值类型参数
for i=0 to 3
dim a
c a,i
msgbox(a)
next
function c(byval a,i)
if i=2 then
a=3
end if
end function
第二是赋值
for i=0 to 3
dim a
a=0
c a,i
msgbox(a)
next
function c(byval a,i)
if i=2 then
a=3
end if
end function