Ver Mensaje Individual
  #2 (permalink)  
Antiguo 09/03/2010, 00:33
Avatar de erbuson
erbuson
 
Fecha de Ingreso: noviembre-2009
Mensajes: 701
Antigüedad: 15 años, 4 meses
Puntos: 53
Respuesta: Pasar cadena a array

Hola:

Puedes pegar el siguiente código en un formulario con un Command1

Private Sub Command1_Click()
Dim Matriz() As String
Matriz = Split("fg@21@45@56@gt@543@56@59", "@")
Dim Indice As Integer
For Indice = 0 To UBound(Matriz)
Print "Elemento "; Indice; " = "; Matriz(Indice)
Next
End Sub

Veras una idea de como puedes hacerlo, después utilizas los elementos de la matriz que quieras
__________________
Agradecer a quien te enseñó, es enseñar lo que de él aprendiste.
Recuerda: Decir gracias, poco cuesta y mucho vale ...