qhnw.net
当前位置:首页 >> vB FunCtion函数 >>

vB FunCtion函数

你在函数内部让函数名等于你要返回的值即可 比如你例子中的 max = x max = y 作用就相当于java或C的return x和return y

1.直接在单元格上调用, =方法名(参数) 2.添加“按钮”等,在click事件中调用3.把鼠标定位在function()函数内部,直接按F5运行4.在其他sub或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

private sub form_click() dim a as integer dim sum as integer for i = 1 to n a = inputbox("请输入第" & i & "个数:", "偶数相加") if a mod 2 = 0 then sum = sum + a next i print sum end sub

代表在调用时要传递给 Function 过程的参数变量列表.多个变量应用逗号隔开.jg=juedui(2)sub也可以public sub juedui(bdll as double,jg as duoble) '这里的jg就是结果end sub

意思是功能,就是这个对象特殊的功能,好像是呢

仅供参考: public function printf(byval color as integer, optional obj) if not ismissing(obj) then if color = 0 then '黑色 obj.backcolor = rgb(0, 0, 0) elseif color = 1 then '白色 obj.backcolor = rgb(255, 255, 255) elseif color = 2 then '浅灰色 obj.backcolor

用function自定义函数,跟一般的子程序基本相同.不同的是,function需要有返回值 例如 private function sumQiuHe(x as integer,y as integer) sumQiuHe=x+y end function 然后,在其他程序段中调用 dim i as integer i=sumQiuHe(3,5) 即可得i=8

function是函数,有返回值.sub是过程,没有返回值.

可以用啊比如Public Function sort(ByRef a() As Integer) Dim temp As Integer Dim x As Integer x = UBound(a) For i = 1 To x For j = 1 To x - i If a(j) > a(j + 1) Then temp = a(j + 1) a(j + 1) = a(j) a(j) = temp End If Next j Next i Return 0 End Function这个函数引用的时候直接代入一个数组就可以对其进行排序了

网站首页 | 网站地图
All rights reserved Powered by www.qhnw.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com