Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/09/2009, 20:10
hunter18
 
Fecha de Ingreso: junio-2008
Mensajes: 343
Antigüedad: 15 años, 10 meses
Puntos: 4
Quitar espacios al cargar .txt en RichTextBox

Cargo el archivo pero quiero que si hay mas de dos espacios solo me muestre un espacio al cargarlo en el RichTextBox1 por ejemplo el archivo.txt contiene esto:
Código PHP:
palabra 1palabra 2,               palabra 3palabra 4 
Como veran entre palabra 2 y palabra 3 hay mas de un espacio al cargarlo en el richbox quiero que me muestre asi
Código PHP:
palabra 1palabra 2palabra 3palabra 4 
En pocas palabra cuando haya mas de dos espacios solo le coloque uno
Código:
  Open CommonDialog1.FileName For Input As #1
  
  While Not EOF(1)
    'Leemos la línea
    Line Input #1, Linea
    
    'Vamos cargando las líneas leídas en el text1
    RichTextBox1.Text = RichTextBox1.Text & Linea & vbNewLine
  Wend
  
  'Cerramos el archivo abierto anteriormente
  Close