fields后边跟变量要怎么表达

Question

For i = 1 To 30
rs.Fields(Str(i + 2)) = Val(Trim(Text5(i).Text))
next其中这个表达式不正确rs.Fields(Str(i + 2))不知道fields后边要怎么表达才行，因为有个变量i  第三个字段开始，望高手指教哈。。

Answer 1

For i = 1 To 30
rs.Fields(i + 2) = Val(Trim(Text5(i).Text))
next

Answer 2

Fields(为数字而不是字符)，而Str(i + 2)返回字符

Answer 3

那个字段名是a1 a2 a3 a4....a20这样的

Answer 4

 sql = "select * from pdata where 姓名='" & Trim(Label1.Caption) & "'"
        Set rs = New ADODB.Recordset
            rs.Open sql, cn, adOpenForwardOnly, adLockOptimistic
            If List1.SelCount = 1 Then
            For i = 1 To 30
            rs.Fields(i + 2) = Val(Trim(Text5(i).Text))
            Next
            rs.Update
            End If改成这样还是不行，还是提示未找到