как передать Array как paramenter в макросе VB

Question

Я пытаюсь передать параметр массива в подпрограмму VB. если я использую '()' вместе с именем массива, тогда он говорит 'Sub или Function not defined', и если он удаляется, то он выдает ошибку компилятора как «Несоответствие типа: Массив или определенный пользователем тип».

Dim arypred() As Long 
Dim dependlink() As Long 

Main Sub() 

..... 
getPred arypred(), dependlink() 'Call to the sub procedure getPred 

End Sub 

Public Sub getPred(arypred() As Long, dependlink() As Long) 

.... 

End Sub 

Я googled, но я не могу отследить точное решение для этого. Кроме того, я запутался между вариантом использования и Array(), поскольку большинство примеров, которые я видел, использовали Varaint.

Извините, если этот вопрос очень прост; Я новичок в VB и изучаю это. , пожалуйста, помогите сделать эту работу.

Спасибо заранее.

Answer 1

ли это так

Sub Main() 
    Dim arypred() As Long = Nothing 
    Dim dependlink() As Long = Nothing 

    getPred(arypred, dependlink) 
End Sub 

Public Sub getPred(ByVal arypred() As Long, ByVal dependlink() As Long) 


End Sub 

Вы не должны включать в себя () символ при прохождении массива и убедитесь, что присвоить начальное значение массива в объявлении. Для начала назначьте nothing.

Предложение: Если вы хотите, чтобы получить значение после вызова метода getPred используйте Public Function вместо того, чтобы возвращать значение. Если этот метод используется только в классе, то используйте Private вместо Public, если только он не является модулем. Если вы хотите, чтобы обе переменные (arypred и dependlink) возвращали новые значения после выполнения метода getPred, используйте ByRef вместо ByVal. Для получения дополнительной информации о ByRef и ByVal, click here и here.