Ver Mensaje Individual
  #6 (permalink)  
Antiguo 14/10/2004, 12:14
Avatar de Bravenap
Bravenap
 
Fecha de Ingreso: noviembre-2002
Ubicación: Los Arroyos, El Escorial, Madrid
Mensajes: 2.084
Antigüedad: 21 años, 6 meses
Puntos: 4
Bueno, vamos allá. No tengo el código delante, pero es algo así:

Defino la estructura normalmente:

Código:
Structure Visado
    Public NumColegiado As String
    ....
End Structure
Y luego simplemente creo un nueva variable del tipo visado así:

Código:
Public Sub cargarVisado(ByVal archivo As String, ByVal i As Integer)
     Dim objReader As New StreamReader(archivo)
     texto = objReader.Read()
     objReader.Close()

     ReDim Preserve visado(i) As Visado
     With visado(i)
          .NumColegiado = texto.Substring(0,12)
          ......
     End with
End Sub
"archivo" e "i" los envío desde la rutina que recorre todos los archivos que hay en una determinada carpeta. El índice "i" me sirve al mismo tiempo para identificar los nombres de los archivos al cargarlos en un ListBox. Cuando quiero acceder a cada una de las variables del tipo Visado desde el ListBox símplemte recojo el índice y llamo a propieadesVisados(i).

Pues básicamente es así. Lo de crear las clases también lo pensé, pero como no iba a necesitar métodos sino solamente cadenas de texto dentro del tipo Visado, me pareció más eficiente una estructura.

Muchas gracias RootK por tu interés.

Un saludo.

Por cierto, dentro de un ratito pongo un nuevo tema. Si es que voy atropellando cosas del ¿dichoso? .Net
__________________
¡¡NO A LA GUERRA!!
Si ponemos a nuestros mensajes títulos adecuados, la gente se animará más a abrirlos y resultarán más útiles en las busquedas. ¡No a los ayuuudaaa, urgenteee y similares!