UC知道VB adodc+datagrid +access问题
来源：百度知道 编辑：UC知道 时间：2024/05/15 08:41:14
在VB中,用adodc+datagrid 的方法,如何显示多个access中的表,表的栏位都是相同的,如两个表都是
Column Name Data Type
store_name char(50)
Sales float
Date datetime
显示为
Column Name Data Type
store_name char(50)
Sales float
Date datetime
store_name char(50)
Sales float
Date datetime
Column Name Data Type
store_name char(50)
Sales float
Date datetime
显示为
Column Name Data Type
store_name char(50)
Sales float
Date datetime
store_name char(50)
Sales float
Date datetime
ADODC控件的属性RecordSource支持SQL结构化查询语言，可以进行ACCESS数据库内多表查询，以下提供查询两表的代码供参考，注意from JWCK_BM as cs,jwl_jiec as sl此句，分别将JWCK_BM表作为cs表和jwl_jiec作为sl表引用，from前的字段名后有表名后缀作区别，将DataGrid控件的数据源选为ADODC1控件：
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=jwl_dbf"
Adodc1.RecordSource = "select cs.js_dm,cs.备件代码,cs.备件名称,cs.备件规格,cs.进口计算机号,cs.最低库存量,sl.结存数量,sl.结存金额,sl.结存单价,sl.类别代码 from JWCK_BM as cs,jwl_jiec as sl" & _
" where cs.备件代码 = sl.备件代码" & " and cs.备件代码>" & "''" & " order by sl.类别代码,sl.备件代码"
Adodc1.Refresh
DataGrid1.Refresh
End Sub