Hola
Podrias explicarlo un poco mejor??
Citarir recorriendo hasta encontrar el caracter de salto de linea vbnewline
Podrias explicarlo un poco mejor??
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarir recorriendo hasta encontrar el caracter de salto de linea vbnewline
Private Sub Buscar_Click()
Dim archivo As String
Open "C:\mi-carpeta\" & txtA & ".txt" For Binary As #1
archivo = Space(LOF(1))
Get #1, , archivo
Close #1
txtSalida.text = archivo
End Sub
Private Sub guardar_Click()
Open "C:\mi-carpeta\" & txtA & ".txt" For Output As #1
Print #1, txtA.text
Print #1, txtB.text
Print #1, txtC.text
Close #1
End Sub
A-4254
A-57456
H-9
Citaryo quisiera la licencia del skinner pro gracias