对数据库不了解,但查了资料。
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\桌面\mdb\data.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select 学生基本情况.学号,学生基本情况.姓名,学生成绩.成绩 from 学生基本情况,学生成绩 where 学生基本情况.学号=学生成绩.学号"
Adodc1.Refresh
DataGrid1.Refresh
DataGrid1.Row = 0
DataGrid1.Col = 0
End Sub
对会者来说,很简单吧,当练习。