十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
就是自己编写一个子过程(sub等)来实现功能
高阳ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景,ssl证书未来市场广阔!成为创新互联公司的ssl证书销售渠道,可以享受市场价格4-6折优惠!如果有意向欢迎电话联系或者加微信:13518219792(备注:SSL证书合作)期待与您的合作!
例 s=1!+2!+3!+4!+...+10!
编程如下:
Dim s As Long
Private Sub Command1_Click()
For i = 1 To 10
Call jc(i) '调用子过程
Sum = Sum + s
Next i
Print s
End Sub
Private Sub jc(ByVal n As Integer) ‘子过程
s = 1
For i = 1 To n
s = s * i
Next i
End Sub
既然是所有窗体都共用,为何不放在Moudle模块里呢?再把窗体名称做为参数传进去。
简单的说:
其实没什么很难理解的东西,所谓(子)过程 你可以简单的理解vb代码中所有的 以 **()开头到 ** end 结束的部分,从格式上上说 这些都是一块一块的! 但是他们的关系并没什么 基本上可以在代码的任何位置插入.
可以说 每一个过程(块)都具有一个独立的功能.所以很多个功能集合或嵌套之后 可以实现更复杂的功能.
通用过程 指放在模块中的过程 (细心点你可以看到模块中的public和窗体中的private关键字)前者是 '公用' 后者是 '私有'!
公用 ---指整个vb工程项目范围内都可以使用
私有---指仅在本窗体中使用
如果 一个过程a调用了很多个过程(比如调用了很多函数),那么这些函数本身就是一段过程代码,那时你可以理解这些函数过程为 这个过程a的子过程.这仅是个相对概念.不是很重要.
重要的是上面说的通用过程,(它在vb代码中是公用的,即你在窗体中写代码,可以之间调用 模块中的各过程,但是其它窗体中不能直接调用另一个窗体中定义的过程.
能理解吗?
sub一般情况下是一个英文前缀,有向下的意思,比如subway(地铁)
submarine(潜水艇)
在计算机中一般是“子……”的意思,比如SubString(子字符串),SubItems(子项)
这儿呢,sub就是指一个“子过程”,一般就简称“过程”,面向对象概念中也叫“方法”。
end
sub标志着子过程的结束,也就是说在sub与end
sub之间,就是这个子过程的内容。
你的 sub过程这个是子过程,无返回值的,这里Form1_Load中b仍然 b=""
如果你想b="注释",将你的sub过程改成自定义函数,用b来接收返回值就行了,代码如下
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim a As String = "rem"
Dim b As String = ""
b = sub过程(b, a)
Me.Text = b '为什么“b”不是等于 "注释"
End Sub
Private Function sub过程(ByVal 输出 As String, ByRef 输入 As String) As String
If 输入 = "rem" Then
输出 = "注释"
End If
Return 输出
End Function
Private Sub 表示这个子过程是私有的,只能在本窗体或本模块中起作用,其他窗体或模块是不能调用这个子过程的;
Sub 或 Public Sub 则表示这是个公共的子过程,工程内的所有窗体和模块都可以调用。