在一个表中新增一个字段，如何实现？

[oxfordxyc]

请问可以用SQL语句在ACCESS数据库中的一个表中增加一个字段吗？如果可以，SQL语句怎么写？

[zxzy1981]

ALTER TABLE tablename ADD fieldname datadtype

[changechange]

此示例在员工表中增加 Money 数据类型的一个工资字段。

Sub AlterTableX1()


Dim dbs As Database


' 在您的计算机中修改此行使其正确指到 Northwind 的路径。

Set dbs = OpenDatabase("Northwind.mdb")

' 对运费超过 $100 的订单，


'添加工资字段至员工表中，

'并且设置为 Currency 数据类型。

dbs.Execute "ALTER TABLE Employees " _

& "ADD COLUMN Salary CURRENCY;"


dbs.Close


End Sub

[oxfordxyc]

此问题已解决，谢谢