请问在ACCESS代码编辑器中怎样应用SELECT语句啊?

lovesun

我想用SELECT语句到一个表中查询符合条件记录,然后把返回的字段值插入到另一个表中,简单的SQL语句我会写,但是不知道怎么在代码编辑器中写入VBA代码.下面是我的简单需求:我的需求如下:
1. 创建新的数据库（在acess中）

2. 建立三个表（stu、scores、course）

3. 写出每个表的字段（属性、数据类型、长度、约束）

4. 建立三个窗体，分别输入三个表的内容，stu和course是直接输入，而scores表则是通过选择学号、课程名称和输入成绩来完成输入的

5. 建立一个查询

其中stu是学生关系

ID 学号 姓名 年龄 性别 所在系名

1 66601 张红 20 女 计算机

2 66602 李军 18 男 计算机

3 66603 王洁 20 男 计算机

4 66604 赵文 21 男 计算机


Course为课程

ID 课程号 课程名 任课教员 学时数

1 C601 高等数学 李一 100

2 C603 操作系统 唐二 78

3 C604 数据库 任三 60

4 C602 数据结构 刘四 70


Score是成绩关系

ID 学号 课程号 成绩

1 66601 C601 100

3 66602 C603 100

4 66603 C603 80

5 66604 C603 11

7 66601 C601 80

lovesun

我是想在成绩输入窗体中,点击添加记录时进行上述操作的.score表中的课程名应为课程号

lovesun

版主救命啊.

lovesun

这个论坛有版主吗?

kcul

Dim db as Database
Dim rst as RecordSet
Set db=currentDb()
sqlString="INSERT INTO STU VALUES(' ',' ',' ')"
Set rst = db.OpenRecordset(sqlString)

lovesun

Dim db as Database
如果上面这句话,不能通过,报告Database没有定义