1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

probl.com visual basic

Discussão em 'Programação' iniciada por pto.master, 20 de Julho de 2007. (Respostas: 6; Visualizações: 714)

  1. pto.master

    pto.master Power Member

    ola todos.. tenho um problema a compilar en visual basic quando tento compilar isto"streamreader"
    Private Sub Form_Load()
    Dim oArquivo As System.IO.File
    Dim oLeitura As System.IOStreamReader
    oLeitura = oArquivo.OpenText("c:\a.txt")
    End Sub


    e ao compilar dame este erro
    compile error user defined type not defined
    brgg................... atentment pto.master
     
    Última edição: 20 de Julho de 2007
  2. K0mA

    K0mA Power Member

    Tenta assim:

     
    Última edição: 20 de Julho de 2007
  3. pto.master

    pto.master Power Member

    nada o problema deve tar nas" references" nao sei qual activar:'(
     
  4. Crepito

    Crepito Power Member

    Tipo usa namespaces. E para isso que eles existem, para alem de deixarem o codigo mais facil de ler:

    Código:
    imports System.IO [COLOR=Navy] '[/COLOR] [COLOR=Blue]<-- namespace[/COLOR]
    
    Private Sub Form_Load()
    [COLOR=blue]
    ' caminho para o ficheiro
    [/COLOR]Dim path as String = "c:\blablabla.txt"
    
    Dim oArquivo As FileStream
    
    Dim oLeitura As StreamReader
    
    oArquivo = File.Open(path, FileMode.Open, FileAccess.Read)
    oLeitura = new StreamReader(oArquivo)
    
    [COLOR=Navy]' neste caso estas 2 linhas de cima podiam ser substituidas por apenas[/COLOR] 
    [B][COLOR=Navy]' [/COLOR]oLeitura = new StreamReader(path)[/B] , [COLOR=Navy]mas deixei assim pois podes vir 
    ' a precisar de saber disto noutros projectos.
    [/COLOR] 
    ( ... )
    
    [COLOR=Navy] '[/COLOR][COLOR=Blue]codigo para o que queres fazer com o ficheiro que esta a ser lido[/COLOR]
    ( ....)
    
    filestream.close()
    streamreader.close()
    
    End Sub
    
     
    Última edição: 20 de Julho de 2007
  5. pto.master

    pto.master Power Member

    continuo com mesmo erro
     
  6. Crepito

    Crepito Power Member

    Que erro e que te da?


    PS: Reparei que me enganei numa cena:

    Código:
    filestream.close()
    streamreader.close()
    
    Esta errado!

    A maneira correcta :
    Código:
    oArquivo.close()
    oLeitura.close()
    
    Teste o codigo e esta a funcionar. E claro que o que eu te dei n faz nada para alem de abrir e fechar o stream.


    Um exemplo funcional:

    Código:
    
    imports system.io
    
    Private Sub MainForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim path As String = "c:\telefones.txt"
    
            Dim oArquivo As FileStream
    
            Dim oLeitura As StreamReader
    
    
            Try
                oArquivo = File.Open(path, FileMode.Open, FileAccess.Read)
                oLeitura = New StreamReader(oArquivo)
                MsgBox("Ficheiro Aberto!")
                oArquivo.Close()
                oLeitura.Close()
            Catch ex As Exception
                MsgBox(Err.Description)
            End Try
    
        End Sub
    
     
    Última edição: 20 de Julho de 2007
  7. pto.master

    pto.master Power Member

    compile error user defined type not defined
     

Partilhar esta Página