我是一个初学者，现在急需用vb编程读取DAT文件的数据。请各位兄弟姐妹赐教！！先谢过了！！

问题补充：
dat文件里面是大量的数据，有的数据不需要，只需要把有用的出来就可以了。比如第一到十行都不需要输出，从第十一行的第三列开始输出。

Option Explicit
'一个简单的例子：
Const MODE_READ = 1
Const MODE_WRITE = 2
Const MODE_APPEND = 8

Private Sub Command1_Click()
'On Error Resume Next
Dim objFso
Dim objTs
Dim nLineCount As Integer
Dim strLine As String

nLineCount = 0
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objTs = objFso.OpenTextFile("D:\test.dat", MODE_READ)

Do While Not objTs.AtEndOfStream
nLineCount = nLineCount + 1
If nLineCount > 10 Then '行数大于10
strLine = objTs.ReadLine '读取当前行赋给strLine
'做些其他处理，比如从11行的第三列开始输出到窗体
If nLineCount = 11 Then
strLine = Mid(strLine, 3)
End If
Form1.Print strLine
End If
Loop
objTs.Close
Set objTs = Nothing
Set objFso = Nothing
End Sub

DAT文件？是小解霸文件？