vb6 中如何读取文件文件中的日期时间序列和相应数据，文件格式如下：

你要达到什么样的结果?

如果是这样的要求，我建议使用数据库文件。

当然，你这样也可以的，问题你上面的数据包括 几点 --- 几点的，到表格里，不要这样的格式了？
我先告诉你如何读取文本文件吧！

Option Explicit
Private Sub Command1_Click()
Dim LStr As String
Dim d() As String
Dim i As Integer
Open "c:\ssk2.txt" For Input As #1
Do While Not EOF(1) ' 循环至文件尾
Line Input #1, LStr '读入一行
d = Split(LStr, " ") '以一个西文空格为分隔符号，把一行分离到数组里
For i = 0 To UBound(d)
Print d(i); " "; '输出显示
Next i
Print
Loop
Close #1 ' 关闭文件。
End Sub

Private Sub Form_Load()
Open "c:\11.txt" For Input As #1
Dim a, b, i, x
a = StrConv(InputB(LOF(1), 1), vbUnicode)
b = Split(a, vbCrLf)
With MSHFlexGrid1
.Rows = UBound(b) + 1
.Cols = 3
.ColWidth(0) = 300
.ColWidth(1) = 2000
.ColWidth(2) = 1000
For i = 0 To UBound(b)
x = InStr(InStr(b(i), " ") + 1, b(i), " ")
.TextMatrix(i, 1) = Left(b(i), x - 1)
.TextMatrix(i, 2) = Trim(Mid(b(i), x + 1))
Next
End With

End Sub