vb資料庫添加數據

① 如何用VB代碼向資料庫中添加數據表

'以下代碼可以向當前資料庫添加數據表
'(測試OK,添加"Table1"數據表，包含4個欄位)：

Set NewTable = CurrentDb.CreateTableDef("Table1")
With NewTable
.Fields.Append .CreateField("欄位1", dbText)
.Fields.Append .CreateField("欄位2", dbText)
.Fields.Append .CreateField("欄位3", dbText)
.Fields.Append .CreateField("欄位4", dbText)
End With
CurrentDb.TableDefs.Append NewTable

② vb 中向資料庫插入數據

可以用ADO空間+文本框捆綁數據設計

也可以用普通文本框設計界面，讓用戶錄入信息；然後用代碼實現寫入：
1.建立ADODB的連接對象
2.連接資料庫
3.打開連接對象
4.通過連接對象執行SQL語句（用Insert寫入數據）
5.關閉對象。
希望對你能有所幫助。