VB StreamReader

Topic created · 3 Mensajes · 508 Visitas
  • 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ódigo

    if 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 condicionales

    leesystem.close()
    

    asias de todos modos feu :3