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 = NothingEnd 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語句，然后運行，搞定

總結

以上是生活随笔為你收集整理的access 如何使用dolby_Access/VBA/Excel-Access表及字段创建-03的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。