Cómo usar la declaración if en vb para escribir 5 números seguidos

k=0

for

i=1

to

500

si

i

mod

13=0

entonces i;

：

k=k 1

'Imprime todos los números hasta 500 que son divisibles por 13

if

k

mod

5=0

luego

'5 filas

siguiente

yo