任意前n个数求和

      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)等等。