| Pregunta: | 37293 - EJECUCION DE EVAL() |
| Autor: | Carlos Moreno |
| Que tal. Lo he intentado de varias formas, pero nada: kk = "Forms!BAJA1!cuadro.ForeColor = 255" eval (kk) Como hago para que esto funcione, ya que si bien no da mensaje de error, no hace nada en el formulario. (ejecutar el contenido de una variable como si fuera una sentencia) Un saludo | |
| Respuesta: | Victoria |
| Hola He estado un rato mirando esto que preguntas Esta es la solución que veo: Eval evalúa una operación (encerrada entre comillas) Ejemplo: Eval("1+1") te devuelve 2 O llama a una Function. Ejemplo que he puesto (burda funcion) y funciona: Private Sub Comando8_Click() Eval (cambiarColor(125)) End Sub Function cambiarColor(mColor As Long) Forms!tbProyecto.Detalle.BackColor = mColor cambiarColor = Forms!tbProyecto.Detalle.BackColor End Function Espero que te sirva | |