rs as new adodb.recordsetrs.activeconn...rs.open "select 查询条件"datagrid.datasource=rs
http://group.gimoo.net/review/143466