Как передать модулю ListBox в качестве параметра? - VB

Формулировка задачи:

У меня есть модуль, в который мне нужно передать листбокс из Form2 в качестве параметра, я сделал что-то вроде такого :

                    Листинг программы
                
Public Sub vvodtogoto(ByVal imfirm() As String, ByVal sol_val() As Integer, ByVal smesi_val() As Integer, ByVal fen_val() As Integer, ByVal kolesa_val() As Integer, ByVal poiskbox As TextBox, ByVal n As Integer, ByRef newimfirm() As String, ByRef namebox As ListBox, ByRef tovarbox As ListBox)

Но когда я пытаюсь использовать эту процедуру в Form2:

                    Листинг программы
                
vvodtogoto(imfirm, sol_val, smesi_val, fen_val, kolesa_val, Poiskbox, namebox, tovarbox)

У меня появляется ошибка: Argument not specified for parameter of "tovarbox"... В чём моя ошибка и как это реализовать ?

Решение задачи: «Как передать модулю ListBox в качестве параметра?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Form_Load()
    Dim a() As String
    Me.Show
    DoEvents
    a = Split("1, 2, 3, 4, 5, 6, 7, 8, 9, 0", ",")
    'собираем и передаем массив в процедуру
    Call test(Join(a(), Chr(0)))
End Sub
 
Private Sub test(a As String)
    Dim b() As String, c
    'разбираем массив обратно
    b = Split(a, Chr(0))
    For Each c In b
        Print c
    Next
End Sub