Cita de: petro_boca en 2 Agosto 2010, 02:30 AMSe leer...
OSEAAA, nose cmo explicarlo xD!
yo tengo un TXT que dice
HOL
y quiero reemplazar HOL por lo que tengo en el Text1.Text
a eso me refiero ^^
Pusiste el texto a buscar y a rempazar al reves...
Código (vb) [Seleccionar]
Private Sub Command2_Click()
Dim Data As String
Open ("C:\ejemplo.txt") For Input As #1
Line Input #1, Data
Close #1
Data = Replace$(Data, "HOL", Text1.Text, , , vbTextCompare) 'Esto es para que no haga diferencias entre Mayusculas y minusculas...
Open ("C:\ejemplo.txt") For Output As #1
Print #1, Data
Close
End Sub
DoEvents¡!