txt y coordenadas en vb6

[essolo]

Hola lokoman:
Disculpa la tardansa. Bien, veras; no pude obener un original, pero esto es lo mas exacto posible:

zona 1
zona numero: 1
inicio: 0
puntos de zona por area
block color referencia
1 8 417
2 5 390
(aqui podriamos llegar hasta 20, este tiene solo 2)
tabla
numero
informacion
block 1
-5, 1
1, -7
-7, 2
2, -9
(este primer block siempre graficara un mapa de zona, aqui solo puse unas coordenadas, inventadas; pero en la linea 6 te dice que son 417)
block 2
-221, 150
-321, 161
-331, 163
-301, 163
-286, 164
-279, 161
-284, 169
(en este bloque son 390, tambien tube que inventarlas, pero las referencias son 390, aunque sinceramente no las he contado linea por linea)

Ahora bien:
lo que nececito es identificar cada block para poder asignarle un color, y despues obtener las coordenadas de cada block para graficarlas. Todo lo demas del documento no lo nececito, pero asi son generados los txt, por lo que no me es posible modificarlos.
He tratado de acoplar los codigos que me diste, pero no logro graficar todo en conjunto, a lo mas que he llegado es lina por linea, pero comprenderas que es imposible e ilogico.
Picture1.Line (xA, yA)-(x, y), vbBlue
pense en hacer un bucle, pero como le digo a mi codigo que lea la linea: block 1 para darle un color y obtenga de las siguientes lineas la cantidad de coordenadas; pero solo hasta la linea antes de block 2 y las grafique en el picturebox1.
Espero que me hayas entendido mejor, cualquier idea o codigo siempre es bien agradecido.
Saludos.