[VB.NET] Leggere e scrivere file txt

[Sypher]

Non chiudi tutti gli oggetti rimane aperto il file in lettura quindi io farei così:
Dim objFile As File
Dim cmd As StreamReader
Dim stringa As String
cmd = objFile.OpenText("c:\file.txt")
stringa = cmd.ReadToEnd().ToString()
cmd.Close()
objFile = Nothing