如以下代码
Try
Using sr As StreamReader = New StreamReader("c:\aa.txt", Encoding.Default)
Dim line As String
Do
line = sr.ReadLine
Console.WriteLine(line)
Loop Until line Is Nothing
sr.Close()
End Using
Catch Ex As Exception
Console.WriteLine("The file could not be read:")
Console.WriteLine(Ex.Message)
End Try另外一种方法是通过MY.Computer.FileSystem,如
dim sr as system.io.streamReader
sr=my.computer.filesystem.openTextfileReader("c:\aa.txt") 把全部文本取回
这个对象的很多属性,方法的使用更是方便简单,这里不做累赘

浙公网安备 33010602011771号