将MS Access表中的值分配给变量

Question

我尝试过一些我认为应该非常简单的东西，但它不起作用。我在MS Access中有一个转发器宏，我想用它来输出一组数据到一系列文件。我从Table CurrentSt，字段StCurr中提取当前记录。此表中只有1条记录

为了在输出名称中包含StCurr，我执行以下操作：

 Dim VarOutPut As String
 VarOutPut = CurrentSt.StCurr

然后我在导出命令中调用VarOutPut。当我将VarOutPut设置为固定数字时（例如VarOutPut =＆＃34; 1000＆＃34;），当我尝试从CurrentSt表中调用该值时，我得到一个＆＃34; Object Required＆＃34;错误。

非常感谢任何指导。

Answer 1

您可能会提出几十种选择。如果不了解您的数据结构，这是一种可能性：

VarOutPut = DLookup("StCurr", "CurrentSt")

这假设您的表中只有一个值/行。

否则，您将需要另一种方法。

Answer 2

CurrentSt必须具有对特定表的引用。您可以使用DLookup函数

查找值

varoutput=DLookup("StCurr","CurrentSt",[Any criteria]) as [Type]

查看所有代码真的很有帮助。