Hola! Estoy en una aplicación en la que he puesto esta línea, Imports System.Windows.Forms.Keys, ya que necesito trabajar con las teclas, y en el código necesito utilizar Space(LOF(1)) para trabajar con ficheros. El problema es el siguiente, al tener hecho el Imports, el Space lo toma como si fuera una tecla, pero yo quiero utilizar la función de Space(LOF(1)) sin que me afecte lo otro. Cómo se puede solucionar?
Gracias.
Estoy desde el mobil así que no puedo escribir tan bien formateado xD. Tú problema es que usas funciones que vienen de la versión 6 y son obsoletas. Usa string.padleft(lof(1)) y para los archivos usa streams. Quedaría x ejemplo: string.padleft(streamreader.length) espero que te sirva
Eso no me lo reconoce!
Para usar los streams debes importar System.IO
Sigo sin entenderlo, a ver yo tengo un fichero,
FileOpen(1, Application.StartupPath & "\file.exe", OpenMode.Binary, OpenAccess.Read, OpenShare.Default)
file= Space(LOF(1))
FileGet(1, file)
FileClose(1)
Cómo sería el código en vb.net?
Imports System.IO
Public Function LeerArchivos(ByVal archivo as String) As String
Dim sr As StreamReader = File.OpenText(archivo)
Dim contenido = sr.ReadToEnd();
sr.Close()
return contenido
y para usarlo:
TextBox1.Text = LeerArchivo(Application.StartUpPath & "\archivo.txt")
Eso para leer archivos de texto, para archivos binarios no cambia mucho
Que va sigo sin entenderlo, no veo como abrirlo en binario ni como agregarle LOF(1)
Bueno ya lo he conseguido. Queda de esta forma:
Dim file As String
file= file.PadLeft(LOF(1))