07/08/2013, 10:19
|
| | | Fecha de Ingreso: julio-2013 Ubicación: venezuela
Mensajes: 11
Antigüedad: 11 años, 3 meses Puntos: 0 | |
Respuesta: Archivo Txt sin caracteres de separacion datagridview vb.net Gracias Amigo ldcd por tu valiosa Ayuda tienes razon en lo que me has indicado, quiero indicar ya que no lo mencione este archivo TXT tiene una estructura que tuve que solicitar, es decir, que representa cada dato y ademas tengo los datos en donde comienza y donde termina cada cadena, este archivo lo recorte para menejar solo tres cadenas en el DataGridView. estos son los Datos del TXT : 0111202609936
Estos son los datos de la estructura del mismo: DESDE HASTA CONCEPTO
1 2 GREMIO
3 5 CODIGO CASA COMERCIAL
6 13 CEDULA
este es el codigo que me ha funcionado muy bien cuando el Archivo txt tiene caracteres de separacion ejmplo: "."",""|" ¿que podria mejorar para que funcione de la otra forma?
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
If (TextBox1.Text <> String.Empty) Then
Dim leer As New StreamReader(TextBox1.Text)
Dim texto As String = ""
Dim count As Integer = 3
Dim split As String() = Nothing
While (Not texto Is Nothing)
texto = leer.ReadLine()
If (Not texto Is Nothing) Then
split = texto.Split(New Char() {" |", ";", "-"}, count)
DataGridView1.Rows.Add(split(0), split(1), split(2))
End If
End While
Else
MsgBox("Seleccione el archivo a cargar", MsgBoxStyle.Exclamation, "Error")
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub |