0

如何使用格式(longtime、shortdate 等)将列添加到数据类型 date/time 的访问表中?

我可以按如下方式添加日期/时间类型的列。但它不会为此设置格式

ALTER TABLE Table1 ADD COLUMN MyField DateTime

因此,请提供帮助,以便可以在查询中指定此格式。

4

1 回答 1

1

不幸的是,这不是一个基于查询的解决方案,但使用一点 VBA 很容易修改属性。

Dim db As Database
Dim t As TableDef
Dim f As Field
Dim p

Set db = CurrentDb
Set t = db.TableDefs("myTable")
Set f = t.createField("myDateField", dbDate)
Call t.Fields.Append(f)

Set p = f.CreateProperty("Format", dbText, "Long Date")
Call f.Properties.Append(p)

我避免验证表、字段或属性是否存在,因为我对您的实际问题知之甚少。

于 2013-06-13T13:33:25.307 回答