Autor
|
Tema: visual studio + metodo split (Leído 4,808 veces)
|
darksteel-
Desconectado
Mensajes: 142
|
saludos. bueno estoy haciendo una aplicacion en ambiente visual studio 2005, la cual lee un archivo txt. el problema es que guardo los datos asi. nombre,apellido,edad,pais
el problema es al leerlo y meterlo en un arreglo(array) llamado strNombre. he tratado de usar la funcion de split, colocando como delimitador la ",", pero no me funciona . alguna sugerencia?
|
|
|
En línea
|
|
|
|
naderST
|
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim strNombre As String
strNombre = "Juan,Moreno,15"
MsgBox(Split(strNombre, ",")(1)) End Sub End Class
Te devolveria el apellido. 0 = Nombre 1 = Apellido 2 = Edad
|
|
|
En línea
|
|
|
|
darksteel-
Desconectado
Mensajes: 142
|
muchisimas gracias, eso me funciona a la perfeccion, pero al ponerle el arreglo da error: Dim strNombre() As String Dim inputfile As StreamReader Dim lines As String inputfile = File.OpenText("participantes.txt") Do While inputfile.Peek <> -1
lines = inputfile.ReadLine strNombre = Split(lines, ",")(1)
Loop
inputfile.Close() Error 1 Value of type 'String' cannot be converted to '1-dimensional array of String'. G:\--- Gracias
|
|
« Última modificación: 4 Mayo 2008, 04:24 am por darksteel- »
|
En línea
|
|
|
|
naderST
|
Mira aca te dejo un ejemplo Imports System Imports System.IO
Public Class Form1 Dim inputfile As StreamReader Dim lines As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click inputfile = System.IO.File.OpenText("C:\test.txt")
Do While inputfile.Peek <> -1 lines = inputfile.ReadLine TextBox1.Text = Split(lines, ",")(0) 'Nombre TextBox2.Text = Split(lines, ",")(1) 'Apellido TextBox3.Text = Split(lines, ",")(2) 'Edad Loop End Sub End Class
C:\test.txt
|
|
|
En línea
|
|
|
|
darksteel-
Desconectado
Mensajes: 142
|
heyy ya lo logree asi: Dim inputfile As StreamReader Dim lines As String inputfile = File.OpenText("participantes.txt") For i As Integer = 0 To (strNombre.Length - 1) lines = inputfile.ReadLine strNombre(i) = Split(lines, ",")(i) Next
inputfile.Close() muchas gracias por tu ayuda deverdad!
|
|
« Última modificación: 4 Mayo 2008, 04:26 am por darksteel- »
|
En línea
|
|
|
|
|
|