您的位置:首页 > 编程语言 > VB

递归思想求和

2012-05-31 14:09 120 查看
这次,我有一些崇拜VB了,我觉得它好神奇哦,可以变幻莫测的用另一种方法,用另一种思维来求解平常都熟知的一些套路。

代码编写:

Print   Sub  Command1_click()

   Me,Fontsize=18

   Print   Sum(100)

End  Sub

 

Private  Function  Sum(n  As  Integer) As  Integer

    If  n<>1  Then

         Sum=n+Sum(n-1)

   Else 

         Sum=1

   End  If

End  Function

心得体会:

这次我觉得VB是一门很深奥的学科,我觉得应该要好好地学习一下其中的奥妙!
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签:  integer function vb command