FoxPro/Visual FoxPro - checkbox

Buenas tardes a todos soy nuevo con foxpro y tengo un pequeño problema q acontinuacion les comento resulta que tengo 6 checkbox y necesito q al selecionar 1 los otros 5 se coloquen como enable estoy haciendo algo como esto pero me imagino q esta malo xq no me lo hace..

if Check1.value="t" then
Check2.value="e"
Check3.value="e"
Check4.value="e"
Check5.value ="e"
endif

si alguien me puede ayudar se lo agradezco y gracias.

te convendria usar un OptioGroup

si no

IF ThisForm.Check1.Value="1

ThisForm.Check2.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check5.Enable=.T.

ENDIF
o
DO CASE
CASE ThisForm.Check1.Value=1
ThisForm.Check2.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check5.Enable=.T.
ThisForm.Check6.Enable=.T.
CASE ThisForm.Check2.Value=1
ThisForm.Check1.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check5.Enable=.T.
ThisForm.Check6.Enable=.T.
CASE ThisForm.Check3.Value=1
ThisForm.Check1.Enable=.T.
ThisForm.Check2.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check5.Enable=.T.
ThisForm.Check6.Enable=.T.
CASE ThisForm.Check4.Value=1
ThisForm.Check1.Enable=.T.
ThisForm.Check2.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check5.Enable=.T.
ThisForm.Check6.Enable=.T.
CASE ThisForm.Check5.Value=1
ThisForm.Check1.Enable=.T.
ThisForm.Check2.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check6.Enable=.T.
CASE ThisForm.Check6.Value=1
ThisForm.Check1.Enable=.T.
ThisForm.Check2.Enable=.T.
ThisForm.Check3.Enable=.T.
ThisForm.Check4.Enable=.T.
ThisForm.Check5.Enable=.T.
ENDCASE

muchas gracias por la ayuda pana aun no me los desactiva pero me distes la idea de como hacerlo..

Por lo menos el comando es:
IF Thisform.check1.Value = .t. &&

Thisform.check2.Enabled = .F.
Thisform.check3.Enabled = .F.

ENDIF