Visual Basic - PROBLEMA EN FUNCION

Life is soft - evento anual de software empresarial
 
Vista:

PROBLEMA EN FUNCION

Publicado por OSCAR (1 intervención) el 14/05/2007 12:32:55
Hola a todos, alguien me podria decir que falla en estas lineas de codigo???

STRINGVAR PP;
numberVar INTCADENA;
IF {FACT_SUBCUENTAS.SUBCUENTA_CAMPO6} LIKE '*CM/*' THEN
PP:={FACT_SUBCUENTAS.SUBCUENTA_CAMPO6} AND
INTCADENA:=InStrRev ({FACT_SUBCUENTAS.SUBCUENTA_CAMPO6},'CM/');
ELSE PP:=""
MID({FACT_SUBCUENTAS.SUBCUENTA_CAMPO6},INTCADENA,8);

//LO COMENTO: ES UN FORMULARIO, Y QUIERO QUE BUSQUE EN EL CAMPO {FACT_SUBCUENTAS.SUBCUENTA_CAMPO6} LA CADENA "CM/", EN CASO DE ESTAR QUE ME MUESTRE CM/???????? (8 CARACTERES MAS A LA DERECHA DE LA BARRA)
EL"CM/" PUEDE ESTAR AL PRINCIPIO O NO DEL CAMPO POR ESO LO BUSCO ASI.

GRACIAS
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder