Вопросы Теги

Переменное количество аргументов в VB

Как создать функцию с переменным количеством аргументов в Visual Basic?напр.

x =  Sum(1,2,3)
y =  Sum(1,2)

Function Sum('how to declare argument here')
'Is there any special argument manipulation inside function before it is usable?
End Function
22
задан Kratz 13 April 2010 в 14:11
поделиться

2 ответа

Посмотрите Передача переменного числа аргументов

Function Sum(ParamArray Vals() As Variant)
    Dim intLoopIndex As Integer
    For intLoopIndex = 0 To  UBound(Vals)

    Next intLoopIndex

End Function
20
ответ дан 29 November 2019 в 05:00
поделиться

Используйте необязательные аргументы, например: 

Function Sum(Optional X1 As Integer=0, Optional X2 As Integer=0)

или синтаксис универсально переменных аргументов 

Function Sum(ParamArray XArr() As Variant)

(Возможно, я испортил некоторые элементы синтаксиса - не стесняйтесь исправлять.)

12
ответ дан 29 November 2019 в 05:00
поделиться