Visual Basic.NET - Reemplazar espacios por guion

   
Vista:

Reemplazar espacios por guion

Publicado por antonio j_antonio_ro@yahoo.com.mx (1 intervención) el 23/12/2014 17:37:02
Hola, una duda, quiero reemplazar los espacios por guiones bajos a unos archivos, he echo el programa pero solo me cambia el primer archivo, creo que le falta un else para validar que en caso de que no tenga el espacio se pase al siguiente registro, no se como hacerlo, me ayudarian, diez puntos porfa!!!

Private Sub Command1_Click()
Dim PathArchivo As String
Open "D:\maxi\lista.txt" For Input As #1
Do While Not EOF(1)
Input #1, PathArchivo

FileCopy PathArchivo, Replace(PathArchivo, " ", "_")
Kill PathArchivo



Loop

Label1.Caption = PathArchivo
Label1.Refresh

Close #1



MsgBox "termine!!!"

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Reemplazar espacios por guion

Publicado por Miguel (346 intervenciones) el 23/12/2014 20:24:55
Usa la función "Contains" (de String) para saber si tienes el caracter, en tu caso el espacio (" ")...

Saludos,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de giancarlo

Reemplazar espacios por guion

Publicado por giancarlo (280 intervenciones) el 24/12/2014 15:21:18
usa replace: texto.replace(a,b) donde a es el caracter a buscar y b es le nuevo valor
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar