ejecutar una función numérica que está en una variable string

inposible
21 de Noviembre del 2007
hola que tal, tengo una consulta y a lo mejor me pueden salvar...

Tengo:

dim cadena as string
cadena = "(100*50)/8"

Lo que necesito es ejecutar lo que tengo en la variable cadena como si fuera una función numérica y poner ese resultado en una label...
O sea, todo eso, si fuera una variable integer daría 625, entonces yo haría label1.caption = cadena y me pondría los 625 en la label. El problema es que como tengo esa función en una variable string no la puedo ejecutar...

espero puedan ayudarme
Un saludo para todos!

mvallejos
21 de Noviembre del 2007
Lo primero que necesitas, es definir un delimitador en la cadena de caracteres, por ejemplo, espacio en blanco

Cadena = "( 100 * 50 ) / 8 )"

De este modo, se puede separarar cada componente usando la Funcion Slipt

Dim Cadena as String
Dim Lista

Cadena = "( 100 * 50 ) / 8 )"
Lista = Split(Cadena, " ")

En lista, te queda un vector con cada componente de la operacion

Lista ( 0 ) = "("
Lista (1 ) = "100"
Lista ( 2 ) = "*"

y así

De este modo, vas a poder recorrer esa lista con un for efectuando las operaciones necesarias

For i = 0 To Ubound(Lista)
....................
.....................
Next i

Con esto podrás codificar una función que tome como parámetro una cadena con una operación algebraica y retorne un resultado.

Saludos