VB StreamReader
-
Prueba a poner msgbox(leesystem.readtoend) a ver que sale cuando pone german o italian.
-
ando... desquiciado...
en fin, os cuento. tengo una variable "leesystem"Dim leesystem As New IO.StreamReader(CurDir() & "\system\lang.txt")
te lee el archivo que hay en (ruta donde está el programa)\system\lang.txt
okay.
después tengo este códigoif leesystem.readtoend = "english" then msgbox("será ingles") elseif leesystem.readtoend = "español" then msgbox("será español") elseif leesystem.readtoend = "italian" then msgbox("será italiano") elseif leesystem.readtoend = "german" then msgbox("será aleman") end if
el problema es que si lo guardo como "english" si me va, si lo hago como "español" también, pero si lo guardo como "italian" o "german" no me rula.
who is the problem? :trollface: -
El problema es que no cerré el streamreader LOOOL
Había que poner debajo de todas las condicionalesleesystem.close()
asias de todos modos feu :3