Question

VB定义自定义函数的参数为数组，返回值也为数组

您好，您的回答解决了我的问题，但是还有一个问题
如果定义自定义函数的输入值为数组，返回值也为数组，这样定义可不可以
Public Function x(a() As Single, b() As Single, c() As Single, d() As Single, e() As Single, f() As Single) As Single()
.......
End Function
调用的时候这样
Private Sub Command1_Click()
Dim BZ() As Single '定义总评判集BZ
BZ = zpdj(B1(), B2(), B3(), B4(), B5(), B6())
End Sub

Answer 1

可以,但是有问题:
1，你自己定义的函数名是 x，那么调用问什么用 zpdj ？

2，这个也没有什么作用？可以不要。

追问

这个zpdj与x写错了，应该是zpdj，为了提问方便写成x，调用时直接复制了，您看看这样定义及引用有么有什么错误

追答

我不知道你函数里的具体代码,返回给BZ有什么值.如果没有,可以不要.

追问

返回值为single类型的一个数字

追答

那没有问题？

Answer 2

没有问题，就是函数x()要返回数组，如
dim t(3) as single
x=t
End Function