Problema con resultado de vector

[Cream]

A ver si alguien puede ayudarme con este FOR.
Tengo el siguiente string que con un split lo convierto en un vector

secciones="1,4,5,6,7,8,12"
seleccionados=split(revistas,",")


La idea es armar un vector que imprima una lista de 20 elementos y que en negrita resalte los selecciondos.

Aqui esta el bulce, el cual no funciona correctamente

<%
for j= 0 to 20

for k=Lbound(seleccionados) to Ubound(seleccionados)



if j = cint(seleccionados(k)) then
response.Write "<b>" &seleccionados(k)& "</b> "
else
response.Write(j)
end if



next

response.Write "<br>"
next %>

esto es lo que imprime

0000000
1 111111
2222222
3333333
44 44444
555 5555
6666 666
77777 77
888888 8
9999999....

la ide es que imprima


1
2
3
4
5
6
7
8
9....

Desde ya gracias!

[Myakire]

Algo rápido:

Código:

<%
secciones="1,4,5,6,7,8,12"
seleccionados=split(secciones,",")

for i=1 to 20
  Encontrado = false
  For j=0 to UBound(seleccionados)
	    If i = CInt(seleccionados(j)) Then
			   Encontrado = true
				 Exit for
			End If
	Next
	If Encontrado Then
	   Response.Write "<br><b>" & i & "</b>"
	Else
	   Response.Write "<br>" & i
	End If
next
%>

Saludos


PD.
Dices que tienes:
secciones="1,4,5,6,7,8,12"
seleccionados=split(revistas,",")
Lo cual es incorrecto.

[Cream]

Gracias Myakire
"Algo rápido:", pero efectivo, funcionó perfecto!