Question

我正在尝试将计算的文本框'值复制到具有Date（） - 标记的表中。

我有几个文本框，在查询中使用类似的代码（这是“Text39”文本框）：

=DCount("*";"[QRY_ALLE_faktura&kreditnota_forfald]")

这是在计算今天所有未结发票并返回前。 “550”作为价值。

我想要一个按钮，将5个文本框中的所有值复制到表中的特定列。每次单击该按钮时，它应使用Date（）（动态行？）

为其加上时间戳

我已经在这里阅读了有关该主题的所有问题，但似乎没有任何问题适合我的问题。我也花了整整几天的谷歌搜索，但没有结果出来。

如何将Text39文本框中的值复制到表“Test”，列“Depot”，同时它已经创建新行，并在“Date”列中插入今天的日期

Answer 1

在按钮的OnClick事件中，运行与此类似的代码：

Dim SQL As String

SQL = "Insert Into Test ([TimeStamp], [Depot], [NextField], [AnotherField]) Values (Date()," & Me!Text39.Value & "," & Me!Text40.Value & "," & Me!Text41.Value & ")"
CurrentDb.Execute SQL

但是，请帮助自己将文本框重命名为txtDepot之类的有意义的内容。

计算文本框到动态表记录

1 个答案: