manzanas

 M A N Z A N A S


dim a
dim b as intiger (1)
_________________

private en sub1_click
b=CT1
if=M del =then
label1 visible=true
els= if = LETA "A" then
label 2 visible = true
label

else
if letra "N" then
label (3) visible true
label visible= true

else

if leta= 2 then
label visible true
else

if letra = "S" true
label vible true
else

con = CONTI
end if
end if
end if
end if
end if