Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

[AYUDA] Guardar Variables desde una variable con saltos de linea

Estas en el tema de [AYUDA] Guardar Variables desde una variable con saltos de linea en el foro de Visual Basic clásico en Foros del Web. Bueno miren en realidad lo que quiero hacer es lo siguiente: Tengo una variable string con un texto tiene saltos de linea y demas Dim ...
  #1 (permalink)  
Antiguo 02/12/2008, 19:26
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
[AYUDA] Guardar Variables desde una variable con saltos de linea

Bueno miren en realidad lo que quiero hacer es lo siguiente:

Tengo una variable string con un texto tiene saltos de linea y demas

Dim Texto As String
Texto = _
"Mensaje Mensaje1
Mensaje Mensaje2"

Y lo que me gustaria hacer es guardar las dos lineas en variables distintas

osea por ejemplo creo un array creo que se dice asi
Dim Textos(1) As String
Textos(0) = "Mensaje Mensaje1"
Textos(1) = "Mensaje Mensaje2"

Creo que se sobreentiende que los mensajes son dinamicos osea la variable texto puede cambiar y tambien estaria bien contar cuantos saltos de linea tiene para poder crear el array exacto.

Si no me explique bien solo diganlo. Gracias de antemano.
  #2 (permalink)  
Antiguo 03/12/2008, 04:10
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 3 meses
Puntos: 37
Respuesta: [AYUDA] Guardar Variables desde una variable con saltos de linea

Cita:
Iniciado por ErCaZa Ver Mensaje
Bueno miren en realidad lo que quiero hacer es lo siguiente:

Tengo una variable string con un texto tiene saltos de linea y demas

Dim Texto As String
Texto = _
"Mensaje Mensaje1
Mensaje Mensaje2"

Y lo que me gustaria hacer es guardar las dos lineas en variables distintas

osea por ejemplo creo un array creo que se dice asi
Dim Textos(1) As String
Textos(0) = "Mensaje Mensaje1"
Textos(1) = "Mensaje Mensaje2"

Creo que se sobreentiende que los mensajes son dinamicos osea la variable texto puede cambiar y tambien estaria bien contar cuantos saltos de linea tiene para poder crear el array exacto.

Si no me explique bien solo diganlo. Gracias de antemano.
Prueba con la función Split

Dim a() As String
a = Split(Texto, vbNewLine)


Resultado: a(0) = Mensaje Mensaje1, a(1) = Mensaje Mensaje2


  #3 (permalink)  
Antiguo 03/12/2008, 04:22
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
Respuesta: [AYUDA] Guardar Variables desde una variable con saltos de linea

PERFECTO, muchas gracias me funciona a las mil maravillas ^^
Solo he tenido que agregarle para que me de el total de lineas
Index = a.Length

Todo perfecto gracias ^^
  #4 (permalink)  
Antiguo 03/12/2008, 04:38
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
Respuesta: [AYUDA] Guardar Variables desde una variable con saltos de linea

Mmmm tengo otra consulta que se me acaba de venir
Yo leo la variable que esta separada por comas y tienes varias lineas y me queda en el array

a(0) = Bernardo,17,España
a(1) = Guille,23,Peru

Y me gustaría tener estos tres campos por ejemplo separadas en tres variables mas
Esque en realidad lo que quiero hacer es lo siguiente

Tengo un DataGridView y esta consta de 3 columnas y mi variable esta separada por comas
tres exactamente.
y lo que quiero es agregarle los datos en sus respectivas columnas al datagrid pero hay un problema solo me deja introducirlas asi

DataGridView1.item(columna, fila) = Valor

Lo que me habia ocurrido esque si yo tengo la variable a() con la linea separada por comas
y pudiera almacenar esas valores en otras variables.

No se si me explique a lo mejor hay otra solucion mas facil a lo que quiero hacer sin tanta complicacion :P
  #5 (permalink)  
Antiguo 03/12/2008, 04:43
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
Respuesta: [AYUDA] Guardar Variables desde una variable con saltos de linea

Ya esta ya lo solucione:

Dim Index As Integer
Dim a() As String
Dim Valores() As String
a = Split(Archivo2, vbNewLine)
Index = a.Length - 1
MsgBox("Total de lienas: " & Index & vbNewLine & a(1))
Dim i As Integer
For i = 0 To Index
Valores = Split(a(i), ",")
MsgBox("Nombre: " & Valores(0) & vbNewLine & "Descripcion: " & Valores(1))
Next

no se si sera la mejor forma pero hace lo que yo queria :P
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 09:10.