如何将用变量表示数据库字段
数据库里存放数据的字段名为day,forcastime和1、2.....35。为什么执行后，就是1-35的字段数据前移了1个字段，forcastime的值被1覆盖了，35字段的数据为空了。

VB code

Filepath = App.Path + "\T639_Grid1.mdb"strn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Filepath & ";Persist Security Info=FALSE"    With Form1.Adodc1        .ConnectionString = strn        .CommandType = adCmdText        .RecordSource = "select * from T"        .Refresh        For i = 1 To 17            .Recordset.AddNew            .Recordset.Fields("Day") = Date - 1            .Recordset.Fields("Forcastime") = (i - 1) * 3             For j = 1 To 35                .Recordset.Fields("j") = Tdata(i, j)  '字段引用不对             Next        Next            .Recordset.Update    End With

[解决办法]
字段的下标是从零开始的，请检查你的Code。
[解决办法]
.Recordset.Fields("j") = Tdata(i, j) '字段引用不对
改下, .Recordset.Fields(j) = Tdata(i, j)
虽然还是不对,但是你的错太厉害了..


前面的2个赋值,你确定是fields(0)和fields(1)?那么后面j为什么是从1-35呀,是从2开始呀????

.Recordset.Fields("Day") = Date - 1
.Recordset.Fields("Forcastime") = (i - 1) * 3