Тип данных при передаче массива контролов как параметра - VB

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

Добрый день. Такой вопрос меня мучит. Передаю в процедуру как параметр один стандартный контрол (например PictureBox). Никаких проблем:

                    Листинг программы
                
Private Sub mySub (xPic as PictureBox)
xPic.BackColor=xxxx
End Sub

Но вот если мне надо передать массив из этих PictureBox:

                    Листинг программы
                
Private Sub mySub (xPics)
Dim xPic as PictureBox
For Each xPic in xPics 
xPic.BackColor=xxxx
Next xPic
End Sub

В принципе жрёт и так, без явных данных по типу. Но как-то это некрасиво. Каким типом нужно объявлять этот xPics из второго примера? Чтоб не торчал там параметр без типа данных. Аналогично, если мне нужно передать как параметр меню. VB жрёт это без типа данных, но как-то же он это в своих недрах определяет. Какой тип данных нужно задавать в этом случае? Спасибо за помощь... и с наступающим!

Решение задачи: «Тип данных при передаче массива контролов как параметра»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Sub xxx()
for i=1 to 1000
 a=Cells(i,1).value
  for ii=1 to i
    n=n+1
    ' ... тут код какойто с проверкой данных
    ' ... так при i=276 у меня n=501 получалось иногда.
    Cells(n,1).value=a
  next ii
next i
end sub