VB自定义函数是否允许由用户决定参数的个数？
答案:1 悬赏:30 手机版
解决时间 2021-02-09 00:45
- 提问者网友：最美的风景
- 2021-02-08 06:52
VB自定义函数是否允许由用户决定参数的个数？
最佳答案
- 五星知识达人网友：夜风逐马
- 2021-02-08 08:01
楼主说的参数叫可变参数，可以使用ParamArray关键字定义可变参数
在形参表中定义
ParamArray 数组名()
即可创建一个数组，该数组存储用户输入的参数。
举例：
Sub Add(ParamArray list())
Dim sum As Integer, i As Integer
For i = LBound(list) To UBound(list)
sum = sum + list(i)
Next i
MsgBox "sum=" & Str(sum)
End Sub
Private Sub Form_Load()
Add 1, 2, 3, 4, 5
End Sub
过程Add可将传递过来的参数加起来，和 为sum，然后用MsgBox将和输出。
在形参表中定义
ParamArray 数组名()
即可创建一个数组，该数组存储用户输入的参数。
举例：
Sub Add(ParamArray list())
Dim sum As Integer, i As Integer
For i = LBound(list) To UBound(list)
sum = sum + list(i)
Next i
MsgBox "sum=" & Str(sum)
End Sub
Private Sub Form_Load()
Add 1, 2, 3, 4, 5
End Sub
过程Add可将传递过来的参数加起来，和 为sum，然后用MsgBox将和输出。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯