Páginas: [1] 
|
 |
|
 Autor
|
Tema: visual studio + metodo split (Leído 351 veces)
|
darksteel-
 Desconectado
Mensajes: 143
¡Amo YaBB SE!
|
 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
Desconectado
Mensajes: 237
|
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: 143
¡Amo YaBB SE!
|
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: 04 Mayo 2008, 04:24 por darksteel- »
|
En línea
|
|
|
|
naderST
Desconectado
Mensajes: 237
|
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 jose,moreno,15
|
|
|
|
|
En línea
|
|
|
|
darksteel-
Desconectado
Mensajes: 143
¡Amo YaBB SE!
|
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: 04 Mayo 2008, 04:26 por darksteel- »
|
En línea
|
|
|
|
|
Páginas: [1] 
|
|
|
 |
