Set db = OpenDatabase(App.Path & "\数据.MDB", False, False)
    SQL = "SELECT 名称"
    For i = 1 To from1.Listbox2.ListCount
        SQL = SQL & "," & from1.Listbox2.list(i - 1)
    Next
    SQL = SQL & " FROM 数据"
    Set rs1 = db.OpenRecordset(SQL, dbOpenDynaset)
    j = 1
    rs1.MoveFirst
    Do Until rs1.EOF
        For i = 1 To form1.Listbox1.ListCount
            If rs1.Fields(0) = form1.Listbox1.list(i - 1) Then
                j = i
                Exit For
            End If
        Next i
请问这段代码的主要意思是

自己慢慢的从书本中理解吧！

不知道各位前辈在做关联数据库五段正规划是怎么克服的？

这段代码不就是完善sql语句字符串吗？标准访问数据表的语句就是"select 字段1,字段2,字段3,...字段n from 表名"。有时根据用户需要，只要显示字段1,字段3,字段5的数据，用户就把需要显示的字段名称放在一个选择控件中，通过循环完成完整的sql语句。这段代码就是完成这个功能的。

关联数据库五段正规划是什么意思？没做过，也没摆渡到，能不能解释下？
我已经好长时间没做像样的东西了，自觉快老年痴呆了。写程序的确是年轻人的工作，到我这个年纪都不愿想事，不愿写代码。可我又不想这么快老年痴呆，很纠结，如各位高手有项目，能否带带我，让我也参合参合？权当给我一个延缓脑衰老的理由啊！

谢谢

http://tw.myblog.
每次要开始学习ADO的用法
每次都卡在这
数据库的规划
好难懂

有路走了

这个网址打不开呀？