| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 1015 人关注过本帖
标题:函数过程
只看楼主 加入收藏
弗朗明哥
Rank: 2
等 级:论坛游民
威 望:1
帖 子:36
专家分:10
注 册:2019-11-1
结帖率:33.33%
收藏
 问题点数:0 回复次数:4 
函数过程
Function aa(x As Integer) As Long
z = x ^ 2 '过程一
aa = z

End Function
Function ii(n As Integer) As String
y = aa(n) ^ 2 '过程二
ii = y
End Function
Function ll(l As Integer) As Long
h = ii(l) + aa(l) '过程三
ll = h
End Function


Private Sub Command1_Click()
Dim n As Integer
Print aa(2)
Print ii(2)
Print ll(2)
End Sub
这个可以算作过程的递归吗?
子过程可以怎样使用?
搜索更多相关主题的帖子: 过程 Integer Function End Print 
2019-12-24 15:44
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:275
帖 子:4575
专家分:28392
注 册:2008-10-15
收藏
得分:0 
这个真不算递归。递归要求调用自己。

如比输入数字N,求从1+...+N 的和
Function Nj(n as long) as long
if n>1 then
   Nj=n+Nj(n-1)
else
   Nj=1
end if
End Function

Private Sub Command1_Click()
  print Nj(5)
end sub

------------------
子过程,这个只是兼容历史的东西,使用 gosub 调用的,使用 Return 返回,只能在一个过程中使用,限制很多,不建议过多去了解了。

授人于鱼,不如授人于渔
早已停用QQ了
2019-12-25 19:58
弗朗明哥
Rank: 2
等 级:论坛游民
威 望:1
帖 子:36
专家分:10
注 册:2019-11-1
收藏
得分:0 
回复 2楼 风吹过b
我在学子过程的时候他说子过程是为了减少亢余的,可是我发现子过程在应用时候条件限制颇多,反倒很麻烦的感觉,那么它到底是为了什么存在呢?
2019-12-27 08:28
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:275
帖 子:4575
专家分:28392
注 册:2008-10-15
收藏
得分:0 
子程度
1 封装具体功能,方便组合代码
2 重复使用代码,提高代码复用
3 大工程,拆分后,多人协同编程
………

练习的小程序,尽量按功能划分
一些特定的功能,建立专用 bas 文件,在多个工程之间使用。
如读写 ini 文件,有对应的api ,但因字符串格式问题,vb 需要针对处理,就可以封装成一个过程,工程里直接调用,而不每次都写 字符串处理,再调用api 。

授人于鱼,不如授人于渔
早已停用QQ了
2019-12-28 23:16
好吧好吧
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2020-1-11
收藏
得分:0 
2020-01-11 01:04
快速回复:函数过程
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.056498 second(s), 9 queries.
Copyright©2004-2020, BCCN.NET, All Rights Reserved