Abrir un archivo txt
Publicado por Jordi (11 intervenciones) el 11/08/2009 22:22:24
Hola, queria saber como puedo abrir un archivo txt en VB 2008 sin OpenDialogs. Me suena que se tienen que utilizar las funciones FileOpen y FileGet, pero no se como utilizarlas.
Este es el código, que me parece correcto (pero no funciona):
Function Obrir() As String
Dim Contenido As String
Dim ArchivoLibre As Integer = FreeFile()
FileOpen(ArchivoLibre, "D:prueva.txt", OpenMode.Binary)
FileGet(ArchivoLibre, Contenido)
FileClose(ArchivoLibre)
Form1.TextBox1.Text = Contenido
End Function
Gracias.
PD: Estoy haciendo un editor de imágenes (BMP, JPEG y PNG) y me gustaría que si hay algún programador joven con ganas de empezar un proyecto conjunto, enviarme un correo a [email protected]
Otros programas hechos por mi: Compresor(con mi propio formato), Codificador(simple)
Este es el código, que me parece correcto (pero no funciona):
Function Obrir() As String
Dim Contenido As String
Dim ArchivoLibre As Integer = FreeFile()
FileOpen(ArchivoLibre, "D:prueva.txt", OpenMode.Binary)
FileGet(ArchivoLibre, Contenido)
FileClose(ArchivoLibre)
Form1.TextBox1.Text = Contenido
End Function
Gracias.
PD: Estoy haciendo un editor de imágenes (BMP, JPEG y PNG) y me gustaría que si hay algún programador joven con ganas de empezar un proyecto conjunto, enviarme un correo a [email protected]
Otros programas hechos por mi: Compresor(con mi propio formato), Codificador(simple)
Valora esta pregunta


0