VB中的function是什么?

function是自定义函数,sub是自定义过程,

与数学里一样,函数是有返回一个值的,比如 f(x)=3*x+3,当x=2时,f(2)=9,

不过函数与过程没有本质的区别,过程也会返回值的.

建议:

如果只是要返回一个值,而没有其他的 *** 作,用函数如果要返回几个值,或者还有其他的 *** 作,用过程.

function 定义的函数的引用与vb自带的函数的引用方法是一样的.

例子:

主程序:

Private Sub Command1_Click()

Print fan(2)

End Sub

'定义函数

Function fan(x As Single) As Double

fan = 3 * x + 3

End Function

点击按钮后,窗体上显示 9

以下代码适用于包含任意个元素的Option1控件数组：

Private Sub Command1_Click()

With Option1

For k = .LBound To .UBound

If .Item(k).Value Then

.Item((k + 1) Mod .Count).Value = True

Exit For

End If

Next

End With

End Sub

原理：同一容器内的多个单选按钮控件，只要设置其中一个为True，其他的就会自动变为False，所以当检测到某个控件为True，只需把下一个设为True即可，其他的就不用去管它了。

简单地说：Function()函数 调用必须返回执行结果，而 Proceduren 过程的调用是不用返回值。

例如：要利用函数计算两个整数的加运算，并返回计算的结果。

定义函数

Functon AddRet(x as integer ,y as integer)

AddRet=x+y

End Function

调用函数

z=AddRet(6,8)

当执行上面的命令后，z 的值应该是 14

而过程就直接执行了

定义全程变量 z

定义执行过程

Sub AddRet(x as integer ,y as integer)

z=x+y

End Sub

调用过程

Call AddRet(6,8)

查看变量 z 的值应该是 14

---