Visual Basic - Problema con sacar valor de un variable

Life is soft - evento anual de software empresarial
   
Vista:

Problema con sacar valor de un variable

Publicado por Ricardo (2 intervenciones) el 06/01/2009 00:49:14
Que tal, tengo este problema necesito alguna funcion para sacar el valor de una variable que se encuentra en una variable. me esplico mejor con el siguiente ejemplo:

A = "VDTRA", y VDTRA vale 15

Valor = algunafuncion(A) y que el resultado de valor sea 15

Espero algun comentario o ayuda... muchas 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

RE:Problema con sacar valor de un variable

Publicado por pacopaz (173 intervenciones) el 06/01/2009 01:25:53
Dicha función, no existe. Pero puedes generarla tu. Algo como esto:

Function AlgunaFuncion(A as String) as Variant
Dim Res as Variant
Select Case A
Case "Var1" Res = Var1
Case "Var2" Res = Var2
Case "Algo" Res = Algo
...
Case Else Res = Nothing
End Select
Return Res
End Function

Espero que te sirva.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con sacar valor de un variable

Publicado por P3L30N2009 (701 intervenciones) el 06/01/2009 08:53:15
No le encuentro sentido al pasar una variable a otra y que dé el mismo resultado.

Para eso declaras la variable como pública y ya la tienes disponible para todo el proyecto.

Pero bueno, mira esto

Private Sub Command1_Click()
Dim VDTRA As Long, A As Long
VDTRA = 15
A = MiFuncion(VDTRA)
MsgBox A
End Sub

Private Function MiFuncion(ByVal Variable As Long) As Long
MiFuncion = Variable
End Function
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar