txt y coordenadas en vb6

[essolo]

Hola:
No me dio resultado, el codigo que modificaste; al final quedo asì:

y = yb + Mid(DATA, InStr(1, DATA, ",") + 1) / 2
x = xb + Mid(DATA, 1, InStr(1, DATA, ",") + 1) / 2

Se agregò dos variables que pudieran guardar las ùltimas coordenadas leìdas, y poder continuar con el IF; y se dividiò / 2, porque desbordaba en el picture.

En el Load las nuevas variables quedan asì:

xb = (Picture1.Width / 2)
yb = (Picture1.Height / 2)

Esto indica que la primer coordenada, comenzarà al centro del picture.
Bueno, todo esto segùn yo; pero esta funcionando. Mañana comenzare a trabajar en los colores, que me basare en sus codigos, para lograrlo.
Respecto a lo de los command's, los puse asi para que al dar click en el 1º, vieramos que no hacia lo que tenìa que hacer.
El 2º boton, sì lo hacía; pero teniamos que escribir por codigo, linea por linea.
Ese no era el objetivo, el objetivo, es el codigo que vamos armando.
Nuevamente gracias, y no se alejen demaciado jejejeje.
Saludos