Тип данных при передаче массива контролов как параметра - 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

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

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
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

13   голосов, оценка 4.000 из 5

Источник