VB连接ACCESS中两个表 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → VB连接ACCESS中两个表

标题：VB连接ACCESS中两个表

只看楼主

tt770

等　级：新手上路
帖　子：3
专家分：0
注　册：2013-4-8
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：4

VB连接ACCESS中两个表

ACCESS中有2个表
1.学生基本情况
  学号  姓名  性别  专业

2.学生成绩
  学号  科目  成绩

求最终实现结果：
DataGrid1 中显示
学号  姓名  性别  专业  科目  成绩

新手，请教各位大多神如何实现VB连接ACCESS中2个表，非常感激！

mdb.rar (10.17 KB)

搜索更多相关主题的帖子: 如何　姓名　专业　

2015-03-26 11:23

xzlxzlxzl

来　自：湖北
等　级：贵宾
威　望：125
帖　子：1091
专家分：5825
注　册：2014-5-3

第 2 楼

得分:10

联合查询，join关键字，学号为两表关键字段。

2015-03-26 12:20

tt770

等　级：新手上路
帖　子：3
专家分：0
注　册：2013-4-8

第 3 楼

得分:0

求完整代码，好解决，不要懒呀....谢谢楼上。

2015-03-26 14:32

lianyicq

等　级：贵宾
威　望：26
帖　子：735
专家分：3478
注　册：2013-1-26

第 4 楼

得分:10

对数据库不了解，但查了资料。
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
对会者来说，很简单吧，当练习。

大开眼界

2015-03-27 09:44

tt770

等　级：新手上路
帖　子：3
专家分：0
注　册：2013-4-8

第 5 楼

得分:0

以下是引用lianyicq在2015-3-27 09:44:55的发言：

对数据库不了解，但查了资料。
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
对会者来说，很简单吧，当练习。

非常感谢！

2015-03-27 11:31

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-443120-1-1.html