Dim Lstr As String (用来存储文本中读取到的字符串)
Open "G:\ww.txt" For Input As #1 （打开文本，读取内容）
Do While Not EOF(1) （开始按行循环读取）
Line Input #1, Lstr
If Lstr <> "" Then （如果读取到一行不为空，即不为空行时显示在Text1中）
Text1.Text = Text1.Text & Lstr & vbCrLf
End If
Loop
Close #1
需要说明的是Text的MultiLine属性要选择为True
即该Text中文本显示为多行模式
答：线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问：电脑安装了VB6.0，为什么打开方式里面没有VB程序选项，进安装好的VB里去关联...
答：打开方式最下面还有一个《选择程序》，点开后查VB的安装目录的EXE，找到后直接打开，下次就会在打开方式里查到了详情>>
