vba的函数调用与取得返回值
如下面,我想从函数dev(m,i)中取得两个值,然后赋给数组d(2),我传参数的方式对吗?
Sub predition(i)
Dim m, dev, d(2)
dev = 0
For m = 2 To 1651
If IsEmpty(Rows(1).Cells(m)) = False Then
d(2) = dev(m, i)
End If
Next
End Sub
可不可以举例来说一下啊? 展开
1、直接调用或者call 过程名 call 函数名就可以了,比如
Private Sub CommandButton1_Click()
MsgBox "你调用了CommandButton1_Click过程"
End Sub
Private Sub CommandButton2_Click()
Call CommandButton1_Click
End Sub
2、如果有参数的话需要带上参数,比如
Private Sub CommandButton1_Click()
Call MsgStr("这是过程/函数调用示例")
End Sub
Sub MsgStr(str As String)
MsgBox str
End Sub
扩展资料:
在一个变化过程中,发生变化的量叫变量,有些数值是不随变量而改变的,我们称它们为常量。
自变量:一个与它量有关联的变量,这一量中的任何一值都能在它量中找到对应的固定值。
因变量:随着自变量的变化而变化,且自变量取唯一值时,因变量有且只有唯一值与其相对应。
函数值:在y是x的函数中,x确定一个值,y就随之确定一个值,当x取a时,y就随之确定为b,b就叫做a的函数值
输入值的集合X称为F的域;可能输出值的集合Y称为F的域。函数的值域是指通过映射定义域中所有元素的F而获得的实际输出值的集合。请注意,将函数的值字段称为函数的相应字段的子集是不正确的。
在计算机科学中,参数和返回值的数据类型决定了子程序的定义域和对应域。因此,定义域和相应的域是在函数开始时确定的强制约束。另一方面,价值域与实际实现相关。
参考资料:
function a()
a=5
end function
这函数会返回 5
b = Mid(str, 1, 6)
End Function
sub a()
Dim str As Sting
str="123456789"
str=b()'return str="123456"
end sub
广告 您可能关注的内容 |