VB分割字符串的简单问题求助

代码实现要求比较简单，读取有数据的那一行然后将每个数据分割开来，我用的是以下代码，但是只能得到每一行的数据没法用空格将单行的数据分割开来，请问是什么原因呢，我把我用的数据文件贴在附件中了
Private Sub Command1_Click()
Open "D:\111.txt" For Input As #1
Dim tt
Dim t
Line Input #1, t
tt = Split(t, Chr(10))(7)
t = Split(tt, " ")(0)
Print t
t = Split(tt, " ")(1)'这一行会出错
Print t

[ 本帖最后由 Firststep 于 2015-1-19 11:05 编辑 ]