Ошибка синтаксиса при передаче массива методу

Question

Я создал и массив, который сохранит значение входного поля, он говорит, что у меня есть синтаксическая ошибка, и я не уверен, как ее исправить.

Я использовал передачу параметров, которые я буду отображаться ниже, также

Dim name() As String 

For counter = 1 To 5 
Call enter_questionnaire_data(name()) '2.0 
Next 
End sub 

2 подпрограммой

Private Sub enter_questionnaire_data(ByRef name()) 

name() = InputBox("Enter the party name") 

Answer 1

имени использования без скобок

Dim name As String 

и в другом методе

Private Sub enter_questionnaire_data(ByRef name) 
name = InputBox("Enter the party name") 

Answer 2

Почему у вас есть name как массив строк?

вам просто нужно объявить

Dim name As String 

для разрешения name для хранения строки

также вы не можете присвоить значения элементов массива, как этот

name() = InputBox("Enter the party name") 

вам нужно указать индекс также

EDIT: , если вы хотите массив строк для хранения имен, то

объявить статический массив достаточной длины

Dim name(10) As String 

и использования:

name(index) = InputBox("Enter the party name") 
index = index+1; 

где индекс увеличивается на единицу после каждого входа до 10

(с помощью динамического массива будет немного сложно для вас прямо сейчас, поэтому я опускаю динамический массив из обсуждения)

Answer 3

О программе:

Dim name As String <---Without() you can use this for array 

For counter = 1 To 5 
Call enter_questionnaire_data(name as string)<--- can you insert variable/tipe 
Next 

End sub 


Private Sub enter_questionnaire_data(name as string) 

name = InputBox("Enter the party name")