A ver si me explico:


tengo esto:


Dim x As String
Dim y As String
x = 1
y = 2
ahora quiero creardos variables en tiempo de ejecucion:
Prueba1 y Prueba2
Pero quiero crearlas segun los numeros que tengan x e y: y luego asignarles un valor

Algo asi(que no funciona):

"prueba" & x & "= 125"
Traducido=
prueba1=125

Gracias

Si se puede, pero con el control de Script.

Buscate en la guía de recursos que hay un paper que habla de el. También podés buscar en internet...Encontrarás muchísima info.

Cualquier complicación preguntá nuevamente.

Saludos

Son ganas de complicarse. Con un array dinamico tienes la vida resuelta:

Código:

Option Explicit

'Funcion para validar arrays:
Private Declare Sub GetSafeArrayPointer Lib "msvbvm60.dll" Alias "GetMem4" (pArray() As Any, Ret As Long)
Dim Res As Long

Private Sub Form_Load()
 Dim a() As Integer, i As Integer
 
 For i = 0 To 15 'Creamos 16 variables 'al vuelo'
 
 Call GetSafeArrayPointer(a(), Res) 'Validamos que el array este inicializado.
 
 If Res = 0 Then 'Si el array esta sin inicializar le asignamos el primer elemento:
 ReDim a(0)
 
 Else 'Añadimos un nuevo elemento:
 ReDim Preserve a(UBound(a) + 1)
 
 End If
 
 a(i) = i
 
 Debug.Print a(i) 'Muestra los valores en la ventana de depuracion de Visual Basic.
 
 Next i
 
End Sub

Salu2...

Gracias