FoxPro/Visual FoxPro - ActiveX (ProgresBar) - Relacion

Por favor necesito saber como hago la relacion o como hago para que funcione la barra de progreso con un boton de comando (en metodo Clik - hago un Selec <condiciones> INTO TABLE a: ...), por favor urgente!!!! me lei cuatro libros y, o no entiendo o no me dice como establecer la relacion. Cuando ejecuto el form y el comando no pasa nada.
Por vuestra ayuda muchas gracias.

Yo con el progressbar no lo pude hacer, pero encontré un truquito, no es de lo mejor pero ayuda

LOCAL loBar
loBar = CREATEOBJECT("SQLBar")
SELECT * ;
FROM MiTabla ;
INTO CURSOR MiCursor ;
WHERE MiCampo = "ALGO"
RELEASE loBar

*----------------------------------------
* Comienzo la definición de la calse
*----------------------------------------
DEFINE CLASS SQLBar AS CUSTOM
PROTECTED lSetTalk, lWindows
lSetTalk = ""
lWindow = ""
NAME = "SQLBar"

PROCEDURE INIT
THIS.lSetTalk = SET("TALK")
THIS.lWindow = SYS(2015)
DEFINE WINDOW (THIS.lWindow) FROM 0,0 TO 1,1
SET TALK WINDOW (THIS.lWindow)
SET TALK ON
ENDPROC

PROCEDURE DESTROY
LOCAL lThisSetTalk
lThisSetTalk = THIS.lSetTalk
SET TALK &lThisSetTalk
RELEASE WINDOW (THIS.lWindow)
ENDPROC
ENDEFINE

espero que te sirva... cualquier cosa, preguntame
saludos.. suerte

Martin, te agradezco sobre manera, pero te digo que recien estoy aprendiendo, de todas formas no tengas dudas que esta tarde me pongo con libros, mates y a estudiar.
Muchas gracias