private function sum(n as integer) as integer
if n<>1 then
sum=n+sum(n-1)
else
sum=1
end if
private sub command1-click()
print sum(2)
end sub
心得体会:这样写比上次那个100以内求和简单多了,倒数第二行可以任意求,如:sum(3),sum(4),sum(5)等等。
private function sum(n as integer) as integer
if n<>1 then
sum=n+sum(n-1)
else
sum=1
end if
private sub command1-click()
print sum(2)
end sub
心得体会:这样写比上次那个100以内求和简单多了,倒数第二行可以任意求,如:sum(3),sum(4),sum(5)等等。