nayeli
10 de Mayo del 2005

hola lo que pasa es que tengo un problema estamos haciendo un tutorial con evaluaciones pero el maestro nos puso un ejemplo que es el siguiente
commado 1 proc click
cal=0
with thisform
if.optiongruop1. value=1
cal=cal+1
endif
if. optiongrup.value=2
cal=cal+1
endif
if.optiongrup.value=1
cal=cal+1
endif
if cal>=2
messagebox("aprovado")
thisformset. release
else
messabebox ("reprovado")
pero necesito otro ejemplo para evaluar
gracias por su atencion