de string a integer

[strike20]

hola beuno tengo lo siguiente
'donde tamanio es el numero de preguntas de una encuesta, resultante de una consulta...
por ejemplo daria tamanio=24

<%dim tamanio%>
<%
dim vector(tamanio)
for i=0 to tamanio
vector(i)=i
next
%>
<%
for i=o to ubound(vector)
response.write (i)
next
%>

deberia salir, pero me dice que tamanio es string y deberia ser integer....como podria solucionarlo? si quiero que llene el vector de acuerdo al numero de registros que encontro...gracias