
09/03/2010, 00:33
|
 | | | 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 ... |