Part 1：前面的话
- 对Access数据库的大部分操作都可以通过SQL语言来实现
- SQL:Structure Query Language，结构化查询语言，语法简单，非常容易学
- SQL语言的执行可借助于ADO，ADO本身也支持对数据库的各种操作，但是涉及到一些其它知识的学习
- 这个系列中，除非无法用SQL来实现，否则会使用SQL
- SQL作为数据库操作的通用语言，学会了后也可用于对其它数据库的操作，那也是极好的
Part 2：本篇目标
- 对已有空白数据库创建一个数据表
- 根据要求创建新的字段，指定字段的约束
- 基本逻辑过程：
- 连接数据库
- 确定SQL语句
- 执行SQL语句
- 根据需求重复上面两步
- 关闭数据库的连接
- 记得引用Microsoft ActiveX Data Objects 2.8 Library
Part 3：代码
Sub test() Dim cnn As New ADODB.Connection '连接 Dim rs As New ADODB.Recordset Dim SQL As String Dim tblName Dim dbAddr dbAddr = ThisWorkbook.Path & "\学生信息.accdb" tblName = "学生信息表" '连接数据库 With cnn .Provider = "Microsoft.ACE.OLEDB.12.0" .Open "Data Source=" & dbAddr End With SQL = "CREATE TABLE " & tblName & " (ID AUTOINCREMENT primary key)" Set rs = cnn.Execute(SQL) field1 = "姓名 text(6)" field2 = "学号 single" field3 = "性别 text(1)" SQL = "ALTER TABLE " & tblName & " ADD " & field1 & "," & field2 & "," & field3 Set rs = cnn.Execute(SQL) cnn.Close Set rs = Nothing Set cnn = Nothing End Sub
执行结果：新建表
执行结果：新建字段
Part 4：部分代码解读
- ADO连接不同数据库采用不同引擎
- Microsoft.ACE.OLEDB.12.0 连接Access
- 老版本的Access（.mdb后缀的）可以使用引擎 Microsoft.Jet.OLEDB.4.0
- CREATE TABLE " & tblName & " (ID AUTOINCREMENT primary key)创建了一个工作表，并设置一个字段（主键，唯一且自增）
- CREATE TABLE 工作表名称 （字段信息），中文释义可以理解为：新建数据表XX，字段XX且为主键
- ID这个字段每增加一行记录，会自增1，设为主键
- SQL = "ALTER TABLE " & tblName & " ADD " & field1 & "," & field2 & "," & field3，新增字段
- ALTER，修改，上面的SQL中文释义可以理解为，修改数据表XX增加字段XX，其实还是比较直白的
- field2 = "学号 single"，设置字段特性，字段名称为学号，类型为Single，单精度实数
- Set rs = cnn.Execute(SQL)，运行该SQL语句
字段约束
主键官方定义： 主键是表中的一个字段或字段集，为每条记录提供一个唯一的标识符。 在数据库中，请将信息划分到基于主题的不同表中。 然后，使用表关系和主键以指示 Access 如何将信息再次组合起来。 Access 使用主键字段将多个表中的数据迅速关联起来，并以一种有意义的方式将这些数据组合在一起。
小结：想对数据库的操作转化为对应的SQL语句，然后运行，搞定
