适用于:Access 2013、Office 2013
获取或设置表示计算字段的公式的表达式。 读/写 String。
版本信息
添加的版本:Access 2010
语法
表达式 。表达
表达式 一个表示 Field2 对象的变量。
备注
在 Access 2013 中,可以创建计算值的表字段。 计算可以包括来自同一表中字段的值以及内置 Access 函数。
计算不能包含来自其他表或查询的字段。
计算结果为只读。
示例
以下示例显示了如何创建计算字段。 CreateField 方法将创建名为 FullName 的字段。 Expression 属性随后将被设为用于计算字段值的表达式。
示例代码提供方:Microsoft Access 2010 程序员参考。
Sub CreateCalculatedField()
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Dim fld As DAO.Field2
' get the database
Set dbs = CurrentDb()
' create the table
Set tdf = dbs.CreateTableDef("tblContactsCalcField")
' create the fields: first name, last name
tdf.Fields.Append tdf.CreateField("FirstName", dbText, 20)
tdf.Fields.Append tdf.CreateField("LastName", dbText, 20)
' create the calculated field: full name
Set fld = tdf.CreateField("FullName", dbText, 50)
fld.Expression = "[FirstName] & "" "" & [LastName]"
tdf.Fields.Append fld
' append the table and cleanup
dbs.TableDefs.Append tdf
Cleanup:
Set fld = Nothing
Set tdf = Nothing
Set dbs = Nothing
End Sub