加一个data控件data.databasename = 你的数据库名字data.recordsource = 你数据库表名list.datasource = data1list.datafield = 你要显示的字段（如名字）完成
