[交流] 【求助】VB如何读取txt文件~~ 已有9人参与

VB新手求助，现有站点温度数据，现在要将其转为二进制，请问各位大虾如何用vb读取数据文件~~数据格式如图所示，每年为一个数据模块，第一行为站点和年份，下面为日数据每年366个（每行30个数据，最后一行6个）数据到2010年~~~谢谢咯~~~下面是我试验的读数据部分程序： 我是想一个一个的把数据读出来，然后计算，但现在是一行一行的读~~ Option Explicit Dim year(80, 100), n(100), i, j, k,As Integer 'Dim c(1 to 368) as integer Dim oo, sta(80), c(1 To 368) As String Sub ctm() 'For i = 1 To 80 i = 1 'Open "e:\extr\原始资料\hisctm\ctm" + sta(i) + ".dat" For Input As #1 Open "test.txt" For Input As #1 For k = 1 To 368 Input #1, c(k) Debug.Print c(k) Next k End Sub [ Last edited by yhwsmile on 2010-9-21 at 16:10 ]

回复此楼