以下代码使用StreamReader从文件(“c:/boot.ini”)中读取信息,并将读取的信息显示在文本框中Text
Box2中。请根据程序代码中的注释将程序补充完整。
DimsrAsStreamReader
'打开将要读取的文件.
sr=File.OpenText(“①__________”)
'从文件中读取行.
DimxAsString
Whilesr.②__________<>-1
x=sr.ReadLine()
TextBox2.Text&=x&vbCrLf
EndWhile
TextBox2.Text&=vbCrLf&"------------theend------------"
sr.Close()