Variables en tiempo de ejecución

[jorevale]

Saludos amigos

¿Con VB6 es posible crear las variables en tiempo de ejecución?

Supongamos que tenemos un sistema al cual se autentifican los usuarios para entrar, mediante el lógico procedimiento usuario-contraseña.

Si los datos proporcionados son correctos, el sistema abre una sesión para dicho usuario. Hay una tabla "sesiones" que le asigna al usuario la primera sesión que esté vacía. Dicha tabla tiene los registros de la siguiente forma:
Sesión Ocupada(S/N)
001 S
002 S
003 N
...
nnn

En el ejemplo, al usuario que se está conectando se le asignaría la sesión 003, la primera que está vacía en la base. Bien. Mi intención es que a partir de este punto, todas las variables del programa para esta sesión tengan 003 en la parte final de su nombre, con lo cual tendría que crear las variables en ejecución, o renombrarlas.

Las variables quedarían para este ejemplo del siguiente modo:

VarA_003
VarB_003
...
Varn_003

Pero eso lo tengo que hacer en ejecución, porque en diseño no se sabe que número va a tener la sesión del usuario.

¿Por qué lo necesito?

Pues porque es un sistema multiusuario y la actividad de un usuario de la red puede interferir - y de hecho interfiere - con la de los demás, dado que todos ejecutan el mismo ejecutable en el servidor, y las variables para cada uno de ellos se llama igual que para el resto, y yo pretendo establecer la diferenciación en el nombre de la variable.

Bueno, si alguien tiene alguna idea, os lo agradecería.

Gracias

[[EX3]]

No se pueden crear variables en tiempo de ejecucion, por que no es util ni practico a la hora de programar y por que directamente no se puede, pero si se pueden añadir o eliminar elementos en un array dinamico:

Código:

'Asi declaras un array dinamico de tipo String. 
'Se pueden declarar arrays dinamicos del tipo que sea
'inclusive tipos propios:
Dim Var() As String

'El array dinamico recien creado no tiene dimensiones 
'ni elementos donde escribir o leer. Asi asignamos 
'elementos al array:
Redim Var(5) As String

'Y asi añadimos tantos elementos como queramos sin 
'perder el contenido de los ya existentes:
Redim Preserve Var(29) As String

Salu2...

[jorevale]

Gracias por la idea, EX3, analizaré las posibilidades de hacer lo que pretendo empleando los arrays dinámicos.

Salu2