找出下面代码的错误,并说明原因加以改正。(VB)

[复制链接]
查看11 | 回复2 | 2013-1-28 21:34:27 | 显示全部楼层 |阅读模式
Private Function Sum(n As Integer) As IntegerIf n = 0 Then
Exit FunctionElse
Sum = n + Sum(n - 1)End IfEnd Function既然是递归 参数总得有变化 或大 或小 需要一个方向...
回复

使用道具 举报

千问 | 2013-1-28 21:34:27 | 显示全部楼层
Private Sub xxx要么就是Function xxxFunction sum( n as integer)If n=0 Then
Exit FunctionElse
Sum=n+Sum(n)End IfEnd Function...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行