Cuantos elementos en una coleccion?

Dos preguntas:
Cual es el maximo numero de elementos que caben en un objecto coleccion
(collection), hay algun limite ?

Existe alguna forma (asi como hay en otros lenguajes), de unir un string con
otro string y que con esta union se pueda referencia digamos a un elemento
de una coleccion ?

Ejemplo: Si en una coleccion hay las variables o campos (no se como se les
llama), D1, D2, D3, D4, D5, D6 y D7; y me quiero referir en espeficico a
D05, pero sin usar un Case Select, sino una concanetacion de "D"+"7" o algo
por el estilo.
... Codigo
For l_Cont = 1 to p_Collection.Count
Select Case l_Dia
Case 1
l_Algo = p_Collection.Item(l_Cont).D1
' En lugar de usar esto
...Codigo
Case 2
... Codigo
Case 3
... Codigo
Y asi sucesivamente
End Select
Next l_Cont

For l_Cont = 1 to p_Collection.Count
l_Algo = p_Collection.Item(l_Cont).&"D"+Trim(Str(l_Dia)) ' No
podria usar algo parecido a esto, como
Next l_Cont
' se usa en algunos otros lenguajes? (Espero que no este divagando).

Bueno, pero la idea en este caso es eliminar el "Select Case".

Saludos.