前次提问关于引用字段标题的问题，非常感谢各位的热情帮助，特别是TonyDeng斑竹，毫不保留在指导使用FIELD（）函数，本人根据TonyDeng斑竹的提示，通过在表单的Init事件中加入如下一段代码，从而实现了在列表框中添加数据表的全部字段标题的目的。
SELECT qyjbxxb
for i=1 to FCOUNT()
thisform.list2.additem(FIELD(i,'qyjbxxb',1))
endfor

   表单设计界面及运行结果界面如下图：



    非常感谢TonyDeng斑竹的无私帮助。
    接下来，本人又想到另外一个问题：如果希望列表框中添加的字段标题来自两个不同的数据表（同属一个数据库），能否实现？如何实现？

[ 本帖最后由 陶然愚者 于 2013-1-22 09:42 编辑 ]

SELECT qyjbxxb
for i=1 to FCOUNT()
thisform.list2.additem(FIELD(i,'qyjbxxb',1))
endfor
SELECT qyzycpk
for i=1 to FCOUNT()
thisform.list2.additem(FIELD((i+2),'qyzycpk',1))
endfor



是这样吗？
这样能够将两个表的字段添加到同一个列表框中？我试试，如果成功，再来致谢。

感谢三楼、四楼的朋友。按指点，添加如下代码后，实现了既定目标。
SELECT qyjbxxb
for i=1 to (FCOUNT()-1)&&由于数据表的最后一个字段是“企业图片”，所以不予添加到列表框。
thisform.list2.additem(FIELD(i,'qyjbxxb',1))
endfor
SELECT qyzycpk
for i=3 to (FCOUNT()-1)&&数据表的1、2两个段与前一数据表的前两个段相同，最后一个字段为“产品图片”，均不予添加。
thisform.list2.additem(FIELD(i,'qyzycpk',1))
endfor
再次感谢！

[ 本帖最后由 陶然愚者 于 2013-1-22 10:54 编辑 ]