
Incompatibilidad
Publicado por juanjo (110 intervenciones) el 28/01/2007 02:39:25
Hola comunidad Foxera porfa hayudenme
Por que me sale error de incompatibilidad entre el operador y el operando
porque en la varible "lice" no marca error
pero en la varible "sexo" si marca , ¡y esta programados igual! porfa echenme la mano
este el el codigo
a=empty(alltrim(thisform.text1.value))
b=empty(alltrim(thisform.pageframe1.page1.text1.value))
c=empty(alltrim(thisform.pageframe1.page1.text2.value))
d=empty(alltrim(thisform.pageframe1.page1.text3.value))
e=empty(alltrim(thisform.pageframe1.page1.text4.value))
f=empty(alltrim(thisform.pageframe1.page1.text5.value))
g=empty(alltrim(thisform.pageframe1.page1.text6.value))
h=empty(alltrim(thisform.pageframe1.page1.text7.value))
i=empty(alltrim(thisform.pageframe1.page1.text8.value))
j=empty(alltrim(thisform.pageframe1.page1.text9.value))
k=empty(alltrim(thisform.pageframe1.page1.text10.value))
sexo=(thisform.pageframe1.page1.optiongroup1.option1.value)
lice=(thisform.pageframe1.page1.optiongroup2.option1.value)
thisform.pageframe1.page1.label14.visible=.f.
zz=0
if a!=.f.
messageb("Falta numero de percanse",32,"Indispensable")
else
if b!=.f.
messageb("Indispensable")
else
if c!=.f.
messageb("indispensable")
else
if d!=.f.
messageb("Indispensable")
else
if e!=.f.
messageb("sable")
else
if f!=.f.
messageb(""Indispensable")
else
if lice==0
messagebox("No tiene ")
x=2
zz=2
else
messagebox("SI tiene ")
x=1
endif
if sexo==1 *****&&&&&&&&&&------>el depurador me marca el error aqui porfa que es<--------------
messagebox("M")
else
messagebox("H")
endif
*-----------------------------------------------
if x==1
if g!=.f.
messagebox("Falta ")
else
if h!=.f.
messagebox("Falta ")
else
if i!=.f.
messagebox("falta ")
else
if j!=.f.
messagebox("Que ")
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
Por que me sale error de incompatibilidad entre el operador y el operando
porque en la varible "lice" no marca error
pero en la varible "sexo" si marca , ¡y esta programados igual! porfa echenme la mano
este el el codigo
a=empty(alltrim(thisform.text1.value))
b=empty(alltrim(thisform.pageframe1.page1.text1.value))
c=empty(alltrim(thisform.pageframe1.page1.text2.value))
d=empty(alltrim(thisform.pageframe1.page1.text3.value))
e=empty(alltrim(thisform.pageframe1.page1.text4.value))
f=empty(alltrim(thisform.pageframe1.page1.text5.value))
g=empty(alltrim(thisform.pageframe1.page1.text6.value))
h=empty(alltrim(thisform.pageframe1.page1.text7.value))
i=empty(alltrim(thisform.pageframe1.page1.text8.value))
j=empty(alltrim(thisform.pageframe1.page1.text9.value))
k=empty(alltrim(thisform.pageframe1.page1.text10.value))
sexo=(thisform.pageframe1.page1.optiongroup1.option1.value)
lice=(thisform.pageframe1.page1.optiongroup2.option1.value)
thisform.pageframe1.page1.label14.visible=.f.
zz=0
if a!=.f.
messageb("Falta numero de percanse",32,"Indispensable")
else
if b!=.f.
messageb("Indispensable")
else
if c!=.f.
messageb("indispensable")
else
if d!=.f.
messageb("Indispensable")
else
if e!=.f.
messageb("sable")
else
if f!=.f.
messageb(""Indispensable")
else
if lice==0
messagebox("No tiene ")
x=2
zz=2
else
messagebox("SI tiene ")
x=1
endif
if sexo==1 *****&&&&&&&&&&------>el depurador me marca el error aqui porfa que es<--------------
messagebox("M")
else
messagebox("H")
endif
*-----------------------------------------------
if x==1
if g!=.f.
messagebox("Falta ")
else
if h!=.f.
messagebox("Falta ")
else
if i!=.f.
messagebox("falta ")
else
if j!=.f.
messagebox("Que ")
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
Valora esta pregunta


0