salve a tutti,

stò facendo delle prove di lettura File in VB.Net.

Ho un programma in vb6 che crea un file txt "prova.txt", scrive "prova" all'interno del File e chiude il file...

La sub è questa:

codice:
Sub Main()
    Dim NumFile, strPercorsoFile, strCorpo
    NumFile = FreeFile
    strCorpo = "prova"
    strPercorsoFile = "C:\Programmi\SMS\Sms da Inviare\prova.txt"
    If Len(Trim$(Dir$(strPercorsoFile))) > 0 Then Kill strPercorsoFile
    Open strPercorsoFile For Append As #NumFile
    Print #NumFile, strCorpo
    Close #NumFile
End Sub
il problema nasce con vb.net in quanto quando vado a leggere il file mi restituisce "112" e non "prova" come è nel file.

Questa è la funzione di lettura:

codice:
    Function LeggiFile(ByVal PathFile As String) As String
        Dim StreamR As New System.IO.StreamReader(PathFile)
        Return StreamR.Read.ToString
    End Function
Questa funzione viene richiamata ogni volta che viene creato e modificato un file in "C:\Programmi\SMS\Sms da Inviare" (in questa cartella ci sono solo file txt) in quanto nel programma ho inserito un controllo FileSystemWatcher.

perchè succede ciò? c'è qualche soluzione?

grazie

OPS: HO SBAGLIATO A POSTARE... MI SPOSTATE IN VB.NET? GRAZIE