Hola,
Lo que decimos por medio de esto
Dim icono()
Es que icono es un arreglo de tamaño dinámico, ahora bien si tu le pones Dim icono(1) icono solo te dejara guardar dos valores icono(0) e icono(1) es por ello que entre los parentesis no ponemos el tamaño del arreglo para que este tenga n número de elementos que es lo que tu estas creando, es decir creas un arreglo dinámico dependiendo del numero de registros que te regresa tu Query.
Saludos
<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>