Question

请问vb里datagrid1显示表1的内容，点击内容时在datagrid2中显示表2中对应的内容，怎么实现？

两个表共同项是did。 access数据库

Answer 1

参考：Adodc1.RecordSource = "select * from 表1"
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh

Answer 2

在 DataGrid1_RowColChange() 事件里编写代码：
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
DataGrid1.Col = DataGrid1.Columns("did").ColIndex
Adodc2.RecordSource = "Select * From 表名 Where did='" & DataGrid1.Text & "'"
Adodc2.Refresh
End Sub

追问

DataGrid2 还是不显示内容

追答

除非，你选的 did 在 DataGrid2 里不存在？