Red de conocimiento informático - Problemas con los teléfonos móviles - Programación Vf

Programación Vf

Método 1:

Borrar

x=rand()*1000

c = allt(str(x)) amp convertir x a carácter Tipo,

Para i =1 a 3

si substr(c,I,1)="7 "

? "Contiene el número 7"

Salir

endif

Fin

Regresar

Método 2:

Borrar

x=rand()*1000

Para i=1 a 3

Si x10=7

? "contiene el número 7"

salir

endif

x = piso(x/10)

end

Volver

Pregúntame si no entiendes.