如何将文本框中的计算值保存到表格中?我试图将我的计算设为默认值,它正在保存,但如果我更改输入,我的计算不会改变。如果我把它放到我的控制源中,我就无法保存它。
是否可以将计算保存到表格中?
亲切的问候,卢克索
如何将文本框中的计算值保存到表格中?我试图将我的计算设为默认值,它正在保存,但如果我更改输入,我的计算不会改变。如果我把它放到我的控制源中,我就无法保存它。
是否可以将计算保存到表格中?
亲切的问候,卢克索
在大多数情况下,您需要使用事件。控件的更新后事件通常是合适的。例如
Form
---------------------------
Amount : 10
Tax : 2
Total : 12 'Amount + Tax
使用上面的表格,在 Tax 和 Amount 的 After Update 事件中,您可以将绑定控件 Total 更新为 Amount + Tax。
Private Sub Amount_AfterUpdate()
Me.Total = Me.Amount + Me.Tax
End Sub
与计算一样,您必须问自己存储此计算是否相关,或者可以从查询中获得?
INSERT INTO
如果您正在制作新记录或
UPDATE
更新现有记录。
您可能需要一个单独的未绑定文本框,该文本框根据您的具体操作而隐藏。
这会将字段更新为记录 ID 自动编号字段 = 表单上的自动编号字段的fieldName
值。fieldNameTextBox
Insert Into 的语法非常相似。
Dim db As DAO.Database
Dim RecordList As DAO.Recordset
Set db = CurrentDb()
Set RecordList = db.OpenRecordset("qryClientSearch")
db.execute "UPDATE table1 SET table1.fieldName = """ & Me.fieldNameTextBox.Value & """ WHERE Table1.ID = " & Forms![FormName]![ID] & ""