如何正确使用DLookup函数返回字符串？
DLookup函数是Microsoft Access数据库中的一个函数，用于在指定的数据表或查询中查找满足指定条件的记录，并返回指定字段的值。正确使用DLookup函数可以帮助我们快速获取所需的数据。
使用DLookup函数的一般语法如下： DLookup("需要返回的字段", "数据表或查询", "条件")
其中，需要返回的字段是一个字符串，表示我们希望获取的字段名称；数据表或查询是一个字符串，表示我们要在哪个数据表或查询中进行查找；条件是一个字符串，表示我们要查找的记录的条件。
下面是一个示例，展示如何正确使用DLookup函数返回字符串：
假设我们有一个名为"Customers"的数据表，其中包含字段"CustomerID"和"CustomerName"。我们希望根据指定的CustomerID获取对应的CustomerName。
- 首先，我们需要在VBA代码中使用DLookup函数。可以在表单或报表的事件过程中使用，或者在模块中编写自定义函数。
- 在代码中，我们可以使用以下语句来调用DLookup函数并获取返回的字符串： Dim strCustomerName As String strCustomerName = DLookup("CustomerName", "Customers", "CustomerID = 'C001'")
- 上述代码中，我们指定了需要返回的字段为"CustomerName"，数据表为"Customers"，条件为"CustomerID = 'C001'"。这意味着我们要在"Customers"数据表中查找CustomerID为"C001"的记录，并返回对应的CustomerName字段的值。
- 最后，我们可以使用返回的字符串进行后续的操作，例如将其显示在表单上或进行其他计算。
需要注意的是，DLookup函数只返回满足条件的第一条记录的字段值。如果没有找到满足条件的记录，DLookup函数将返回Null值。
推荐的腾讯云相关产品和产品介绍链接地址： 腾讯云数据库 MySQL：https://cloud.tencent.com/product/cdb_mysql 腾讯云数据库 PostgreSQL：https://cloud.tencent.com/product/cdb_postgresql 腾讯云数据库 SQL Server：https://cloud.tencent.com/product/cdb_sqlserver 腾讯云数据库 MongoDB：https://cloud.tencent.com/product/cdb_mongodb
请注意，以上链接仅供参考，具体选择适合自己需求的产品需要根据实际情况进行评估和决策。
相关·内容
2回答
我正在尝试创建一个循环，该循环插入日期，然后在每一行中添加一个月的日期。它没有正确地附加第一个日期。日期是查询中日期字段中的DLookup，因此我认为它应该用作日期。我也不认为我的SQL语句有什么问题。但是当它运行时，表中显示的日期为12/30/1899，如果单击它，它将更改为12:03:34 AM。它应该是5/1/15。我试图让它发挥作用的任何东西都没有给我任何其他结果。
下面是我的代码，请注意:我确定我的总体代码可能还有其他一些错误，但我现在只关注这个日期问题。不过，你可以自由地指出你发现的任何东西。
Private Sub AmortButton_Click()
DoCmd.SetWa
浏览 8提问于2015-06-23得票数 1
回答已采纳
我有一个表格，就是选择电子邮件的基础上，公司已经过期的保险。有些公司既有商务电子邮件，也有个人电子邮件，而其他公司则有一封或另一封。我使用DLookUp功能来选择符合过滤标准的供应商的电子邮件。有什么方法可以让我选择BusinessEmail，但是如果他们没有PersonalEmail，那么它会选择PersonalEmail？
目前，我从=DLookUp("BusinessEmail","tblContacts","Supplier ID = " & [txtSupplierID]开始，然后在其中使用IIf语句，但是我不知道它将如何选择另
浏览 2提问于2022-05-12得票数 0
回答已采纳
1回答
我有几个具有查找字段的表，它们指向第三个表中的相同数据，这两个字段都可以选择多个值。用户可以从每个表中选择一条记录，我需要能够分离出VBA中的重叠值。
为此，我尝试在VBA中创建第三个数组，将结果值转储到其中，但我得到了一个Type不匹配错误。我似乎找不到发生这种事的原因。代码，尽量减少，但又不失去它的意义如下：
Function SetEnabledColours()
'Indexes for arrays of available colours
Dim IndA As Long, IndG As Long, IndO As Long
'Arrays of availabl
浏览 2提问于2018-05-07得票数 0
回答已采纳
1回答
当我试图执行这段代码时，我会遇到一个错误，我认为我在sql查询中遇到了问题，"Service = Dlookup ..."行可以帮助您吗？非常感谢
Private Sub btnConnexion_Click()
Dim Categ As Integer
Dim Service As String
Dim IdProf As Integer
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Dim strSQL As String
Set db = CurrentDb
浏览 2提问于2014-05-31得票数 0
1回答
我在Access中有一个子窗体：
CopyNo是一个组合框，让我可以从MovieCopies表中进行选择。当我选择其中一个时，我希望标题字段显示与该副本的电影ID相关联的正确电影标题。我还希望显示格式。当我选择从DaysRented组合框，如果我选择1并且电影是新的，我希望它显示价格，如果它是常规的3天显示正确的价格等。
我只是不确定如何给组合框赋予逻辑。
如果有人能为我指出在Access 2007中如何做这类事情的正确方向，我将不胜感激。
谢谢
浏览 0提问于2012-03-27得票数 0
回答已采纳
1回答
我试图用数据库中的管理表替换VBA中的所有路径常量，这样用户就可以更改文件夹和文件的位置，而不必编辑vba代码。
代码如下
Private Sub Command8_Click()
Debug.Print DLookup("fsFileLink", "tblFileSystem", "fsFileName= 'TEMPLATES'")
MsgBox = DLookup("fsFileLink", "tblFileSystem", "fsFileName= 'TEMP
浏览 2提问于2014-06-24得票数 0
回答已采纳
如何从类似于此示例的代码中删除一个DLookup？
Dim sCustomerName as String
If IsNull(DLookup("sName", "tblCustomers", "iCustomerID=12345")) Then
MsgBox "Customer name is null!"
Else
sCustomerName = DLookup("sName", "tblCustomers", "iCustomerID=12345")
End If
浏览 1提问于2018-03-15得票数 2
如果标题令人困惑，很抱歉。但是我有一个包含几个不同列的表。一列是KitNumber，另一列是ReturnDate。我正在尝试选择ReturnDate的值，以查看条目的长度(还有，VBA允许您获取日期的长度吗？)我需要做的是，用户将在unbound中输入一个数字，然后该值将在表中查找以查看它是否与其中的另一个值匹配，如果匹配，它将选择返回日期。下面是我现在拥有的代码：
strSQL = "SELECT ReturnDate FROM Crew WHERE KitNumber = " & Me.AssignKit
Debug.Print strSQL
DateLen = L
浏览 1提问于2013-07-23得票数 0
我想从存储它的表阈值中获得lower_limit值搜索，但是我总是得到："Error RunTime 94:无效使用Null值“。我不想让子例程把lower_limit还给我，这对于SearchAbnormalities的下一步是唯一有用的。我已经检查了表阈值( PK由ID_parInput、rangeagein、性别组成)，并且有对应于此选择的行。
Private Sub SearchAbnormalities(ByVal ID_parInput As Integer, ByVal gender As String, ByVal eta As Integer, Optional By
浏览 4提问于2021-05-27得票数 0
我需要创建一个独立的函数来检查一个值是真还是假。我尝试设置一个SQL查询来完成这个任务，但是无法将结果传递给变量。
查询始终只返回一条记录。
如何将SQL字符串的结果作为函数的返回值传递？
已更新
Private Function HasBM(iMandate As Variant) As Boolean
'Returns boolean value for whether or not mandate has a benchmark
Dim sSQL1 As String
Dim sSQL2 As String
Dim db As Database
Dim rs As Record
浏览 3提问于2015-12-09得票数 4
回答已采纳
我有一个从DLookup获取模型的MyTable公式。直到字段名模型的值为空为止，一切都可以工作。
关于它如何不理解空信息，我得到了一个运行时错误94。
我试过使用Nz()函数。当我有这么多双引号和单引号时，使用这些函数是令人困惑的。
这就是我所拥有的。
Dim other as String
other = DLookup("[Model]", "[Part Number & Part Name]", "[Part Number]='" & Forms![Press 2]![Containment - Press 2 s
浏览 0提问于2019-01-18得票数 2
回答已采纳
`
Private Sub Link_Click()
Dim OpenLink As String
Dim db As DAO.Database
Set db = CurrentDb
OpenLink = DLookup("Link", "dbo_tbl3_RankedLM")
FollowHyperlink OpenLink
End Sub
“`My数据库有一个SQL链接表，我从其中提取一个txt数据类型，其中存储了一个超链接。我已经将链接列作为按钮放置在访问表单中。所以每一行都有自己的链接按钮。
我使用
浏览 11提问于2022-05-12得票数 0
我试图用一个变量替换DLookup的域参数，如果需要的话，它的意图是在一个单独的地方进行更改。我是这样声明变量的：
Dim MnMnuSettingTbl As String
MnMnuSettingTbl = "'tblMainMenu'"
这是使用变量的原始段：
Me.MainMenuChoiceOne.Caption = DLookup("BtnText", "tblMainMenu", "ID = 1")
我希望用变量替换域条件"tblMainMenu“，但是当我尝试这样做时，它要么不编译，要么得到
浏览 2提问于2016-11-12得票数 0
回答已采纳
我有下面的公式，但公式的AND部分不被识别。有没有人可以看一看并提供正确的版本？
If DCount("*", "AssetTagTable", "SerialNumber='" & Me.SerialNumber & "'") > 6 Or _
DCount("*", "AssetTagTable", "SerialNumber='" & Me.SerialNumber & "' And
浏览 4提问于2013-10-16得票数 0
2回答
我试图确定共享服务器上的文件路径值(Access中的DLookUp函数的输出)是如何填充的。
我在表单上有一个字段，用于从以下公式获取它的Control：
=DLookUp("[DefaultOuptputDir]","Defaults")
当我在VB编辑器中搜索时，我根本找不到对"DefaultOuptputDir“的任何引用(拼写是正确的，因为它是最初创建的)。我也找不到对下面填充的实际路径的任何引用，所以我不认为它是硬编码的形式。
最终，我希望将这条路径更改为我可以访问的路径，但我需要了解现在是如何填充的。寻找关于我应该检查的内容的意见，谢谢！
浏览 0提问于2018-11-08得票数 0
回答已采纳
1回答
我在Access中有一个db，我正在尝试获取一个textbox来运行我的查询，并将另一个有界textbox的值作为DLookUp中的条件传递。我在设计视图中运行了查询，当我直接输入条件时，它会返回正确的结果。当我打开报告时，它会给出所有可能的行的总和。换句话说，它不过滤行。
谢天谢地，我已经12年没有使用Access了，到目前为止，我所做的一切都是教程/示例拼凑，但这里是.
SQL查询：
SELECT Sum(IIf(Attended=-1,1,0)) AS attendance
FROM Students_Classes_Attendance
WHERE (((CStr([Students_
浏览 9提问于2014-02-17得票数 2
回答已采纳
2回答
当我试图用VBA向本地表插入记录时，我遇到了这个错误。
我检查了数据类型，并为短文本数据类型添加了引号，但它不起作用。
table_newid = "SELECT Cint(t1." & id_name(i) & "_new), " & Replace(select_column_str, local_table_name, "t2") & " FROM " & vbCrLf & _
"(SELECT CInt(DCou
浏览 14提问于2019-08-12得票数 0
我正在使用VBA为on Access创建一个登录。
一切正常，直到输入的用户名(在登录表单上)拼写错误。如果拼写错误，我会得到"Error 94；Invalid use of Null“。以下是我的代码(直到bug所在的位置)
Private Sub Command1_Click()
Dim user As String
Dim userlevel As Integer
Dim TempPass As String
Dim ID As Integer
Dim UserName As String
Dim TempLoginID As String
Dim password As St
浏览 0提问于2016-04-11得票数 1
情况:关于生物标本的元数据被收集在一个访问表中。
样本来自人类患者，患者数据收集在一个单独的表格中。
为了限制我们拥有的私人健康信息的数量，只有当我们实际从新患者那里收到样本时，才能用新患者更新患者数据库。
为了让数据输入工作者知道他们何时需要更新患者表，我希望在样本数据输入表单中有一个按钮，它将把输入的患者ID值作为条件传递给查询。
查询现在看起来像这样：
SELECT Patients.[Patient id]
FROM Patients
WHERE (((Patients.[Patient id])=[Forms]![Specimen entry]![patient id]));
但它永
浏览 1提问于2016-10-17得票数 0
2回答
我正在尝试将查询结果赋值给变量。我有一个查询(让我们称之为"Query1")，它将检查各种条件。我试了一下，如下。
Dim rst As DAO.Recordset
Dim strSQL As String
Dim Variable1 As String
strQry = "Query1"
Set rst = CurrentDb.OpenRecordset(strQry)
Variable1 = ?????
rst.Close
Set rst = Nothing
我需要帮助来完成上面的代码，这样我的变量才能获得查
浏览 0提问于2015-12-02得票数 1
简而言之，我的问题是在尝试填写FEDWire或International Wire的相关信息时，Access查询中的以下函数给出了#错误：
IIf(IsNull([BeneABA]),DLookUp("Code","tblCountryCodes","[Country]=" & [Intl_BeneBankCountry]),DLookUp("State","qryFEDWIRE","RoutingNumber=" & [BeneABA]))
当填充BeneABA时，这将成功工作。在
浏览 27提问于2018-02-01得票数 0
回答已采纳
我有一个基于qryA的frmA。frmA上的Button btnOpenfrmB会打开另一个基于qryB的frmB。但是这个字段包含一些未绑定的文本框，数据来自qryC，即=DLookUp(“frmB”；“qryC”；“ValueC=”& ValueB)。如果qryB没有数据(记录)，则Dlookup字段将返回错误，并且包含这些文本框的opening将以错误结束。我理解frmB的这种行为(没有值B，这就是错误的原因)，但是我如何避免它并正确地打开frmB来输入第一条记录呢？当qryB至少有一条记录时，一切正常。
提前感谢
杜斯基。
浏览 2提问于2017-01-31得票数 0
回答已采纳
1回答
这是一个小问题，但这让我很恼火，因为我尝试在ms access中使用Dlookup函数。
我在主表单中有两个子表单，我试图从第一个子表单到第二个子表单得到一些值，这给了我一个#错误，但是我给出了一个正确的语法。
我只是用一个小的输入来检查它，无论我在表单中提供了什么，它是否可能是一个小的查找命令，它也给了我同样的错误。
对于表单中发生的事情感到困惑，请看一下我在表单中给出的示例dllok语法。
=DLookUp("Fertigungsmenge";"Porduction Table";"Fertigungsmenge=200000")
这个小命令
浏览 5提问于2014-10-20得票数 0
我有一个VBA宏，它从文件中读取数据，然后在会计软件中更新数据。我想在代码中加入一个条件，它将首先从文件中读取供应商编号，然后运行SQL查询，根据该供应商编号检查TAXCLASS。如果TAXCLASS是1，那么它将使用' If‘语句，如果TAXCLASS是2，那么它将使用'else’语句。
第一个选项：
SQL = "select taxclass1 from vendortable where vendorid = 12345"
if taxclass = 1 Then
first condition
else
second condition
End If
浏览 3提问于2020-08-12得票数 0
我有四个表:艺术家、相册、曲目和导入。我基本上是在制作我自己的I-Tunes，这让我很难使用它。无论如何，我的问题是，许多艺术家发行同名专辑，最热门的专辑，等等。我通过excel将ITunes带入Access到我的输入表。添加艺术家很容易，专辑也是如此。我需要引入曲目/歌曲，但我需要通过使用具有多个条件的Dlookup，使用新专辑I更新我的导入表。我尝试过使用/不使用括号、引号、双引号等。我一直收到一个语法错误？
Private Sub Command88_Click()
Dim Count As Integer
Dim ArtistLookupID As Integer
Dim AlbumT
浏览 1提问于2018-05-11得票数 1
2回答
我正在尝试为我正在处理的Access数据库的登录系统编写代码，除了这一错误之外，一切运行都很顺利。我得到了一个
无效使用空
将登录详细信息放入我创建的登录表单后出错，该表单运行良好。问题在于，如果用户只有读取权限，则代码应该将可查看的表单限制为“只读”。我已经对这个问题做了一些研究，似乎这个错误是由VBA试图从带有空值的字段中读取整数引起的，但是VBA不会告诉我错误的确切位置，只告诉行。
我发布了实际导航表单的代码，希望有人能指出我的错误所在，这样我就可以着手修复它了。这是我的登录系统唯一的问题，它只是一个确定实际问题所在的案例，这样我就可以实现所需的任何更改，因为我感觉到它在识别实际
浏览 1提问于2017-11-09得票数 1
回答已采纳
1回答
我有一个包含数千行的5列表格，我需要能够对其进行过滤。在显示表的表单Form1中，我有一个文本字段Value1，其中表将只显示列0= Value1的行。如果Value1为空，则显示所有行。 下面的代码是当前在我的查询构建器的criteria和or字段中使用的代码，效果很好： Like [Forms]![Form1]![Value1] & "*"
IsNull([Forms]![Form1]![Value1]) 我的目标是让条件从表中获取值，而不是表单。我创建了一个在Form1之前弹出的表单，允许您插入Value1，然后点击搜索。然后，该值进入Table1，然后打开Fo
浏览 11提问于2019-04-05得票数 0
请原谅我的处男帖子，如果我的问题以某种方式在其他地方得到了回答，请告诉我那个链接(我确实读过相关的查找主题，但没有得到我想要的)。
我经常在textbox的表单上使用查找(由于access中的新手和懒人)来保存值(计算、显示)，并且知道查找是随机的，如果db不是本地的(我的任务是将它转移到网上)，则需要时间来使用更专业的方法来替代一般的查找用法。
我过去所做的是从一个表(清单)中检索数据，以便在一个表单中填充textbox：
txtItemName=dlookup ("ItemName","Inventory","Inv_ID=" & c
浏览 12提问于2022-02-22得票数 0
我正在尝试运行以下代码，但在DLookUp上遇到了“类型不匹配”编译错误。
DLookUp返回值，对吗？这段代码告诉我:在strSQL记录集中，查找SKUS_ORDERED列等于curSKU2的位置。strSQL、temp、curSKU2都被初始化为字符串类型变量。
...
strSQL = "SELECT * FROM ORDER_DATA WHERE [ORDER]=" & curOrder
Dim temp As String
temp = DLookup("SKUS_ORDERED", db.OpenRecordset(strSQL),
浏览 3提问于2011-07-22得票数 3
回答已采纳
2回答
我有一个包含4个表的数据库，但主要是一个转换表/表单(DiversionT/F)和一个回报表/表单(PaybackT/F)。基本上，当我的程序贷款给我的组织中的其他程序时，就会在DiversionT中创建一个转移。当程序想要回报时，他们会在PaybackT中创建一个回收站条目。
我有一个我很困惑的问题:在PaybackF上，用户输入一个他们想要回报的NSN (长部件代码)。最终，我想要一些表单自动填充基于NSN输入的部件信息。信息存储在DiversionT中。我在PaybackF上创建了几个文本框来显示信息。我试图基于NSN自动填充的第一个文本框是一个名为PartName的文本框。它应该在Di
浏览 4提问于2020-04-15得票数 0
我试图用我的DLookup在控制源码中做一个If语句，但是没有起作用。
这是针对Employee表中的EmployeeStatus的-我在一个子窗体中显示EmployeeStatus。但是，使用my DLookup时，它仅将状态显示为0或-1。
=DLookUp("ActiveEmployee","Employee","EmployeeID=" & [cboEmployee])
浏览 1提问于2014-07-16得票数 0
我在包含搜索词的表单上有一个组合框。用户选择一个搜索项，这将查找一个包含数字X的表。如果类别等于字符串'PHYS‘，则在另一个表中查找X的RVU (一个数字)。我使用嵌套的DLOOKUP语句查找数字X，然后使用该数字X和字符串条件查找RVU。这是我的密码：
FH_array(0) = Val(Nz(DLookup("[RVU]", "[FORES IP Picker]", "[IP]= " & Val(Nz(DLookup("[FORES]", "[IP Number Xwalk]", "[
浏览 1提问于2014-10-27得票数 1
回答已采纳
我不是访问方面的专家，但尝试使用Dlookup做一些事情，但不确定为什么我会得到运行时错误3464。
如果我在文字中输入引擎功率值，在组合框中输入服务类型，则我的要求是获取服务费用的详细信息。我应该得到服务收费价值的文本，请协助。这里我附上表、数据库和查找的屏幕截图。
Dim val As Double
Dim sert As String
Dim engp As Double
sert = Me.Service_Type.Value
engp = Me.Engine_Power.Value
val = DLookup("Ser_charge",
浏览 1提问于2020-03-30得票数 1
回答已采纳
2回答
帮助处理字符串中的函数
、、、
我有一个变量emailBody，它被设置为存储在数据库中的字符串。通过查找函数将电子邮件正文设置为字符串。
emailBody = DLookup("emailBody“、"listAdditions”、"Id =“& itemType)
将电子邮件正文设置为包含IIf函数(其中包括查找函数)的字符串。什么时候
?emailBody在运行时被输入到即时窗口中，它显示emailBody被设置为以下字符串：
新商品是“&Iif(查找(”IsVague“、"CommodityType”、"Description=“& newItem
浏览 8提问于2010-03-08得票数 1
回答已采纳
我正在检查表“每周数据”中存储在表的第一行“每日数据”中的特定日期：
Private Sub Data_Update_Click()
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim rstw As DAO.Recordset
Set db = Application.CurrentDb
Set rst = db.OpenRecordset("Data daily", dbOpenDynaset)
Set rstw = db.OpenRecordset("Data
浏览 2提问于2017-01-24得票数 0
我正在开发一个数据库，这个数据库是几年前由一位同事创建的，最近由一位软件设计师更新，他用他的话说，由于我们的数据库变得过于复杂，他已经“退出”了它的服务。
我收到了以下运行时错误“13”：类型错配。
高亮的错误是：
Me.Controls("Label“&I& "Desc").Caption = DLookup("Description”、"tbl_Contract_Items“、"Mat_Item_No='”& sActualFieldValue & "'")
这是一个记帐数据库，
浏览 1提问于2018-11-16得票数 0
回答已采纳
我试图更新一个基于VBA中的查找字段的字段。这是我的代码：
SQL = "UPDATE tblDispatch td " & _
"SET td.NumOfStops = Dlookup(""NumOfStops"", ""qryStops"", ""PK = td.PK"")" & _
"WHERE td.DispatchDate = #" & Me.tbDate.Value & "#;
浏览 1提问于2018-11-19得票数 0
回答已采纳
我正在开发一个表单，用于在续签保单之前分析财务数据。它需要从表格中提取各种保费和索赔$$总数，并将它们插入到表单中。从那里开始，它将对它们运行一些计算，但这应该是最简单的部分。我最头疼的是获取数据的SQL语句。
在稍微缩小范围之后，我发现问题出在代码将SQL语句放入表单的字段中，而不是SQL语句应该提供的答案。我已经尝试了很多我在网上看到的东西，但我不知道如何解决这个问题。
其中一条SQL语句如下所示：
L12W = "SELECT Sum(tblActPrem.APWrit) AS SumOfAPWrit FROM tblActPrem " _
& " WH
浏览 1提问于2015-01-24得票数 0
我正在尝试本地化应用程序显示给用户的消息，所以我将所有消息存储在一个具有不同语言id的access表中。但是，如果消息字符串由不同的变量或新行组成，则结果消息的格式不符合其应有的格式，因为整个消息显示为字符串(具有变量名和新行)。以下是代码；
msgStr = DLookup("msgString", "tLocalization_Messages", "msgId=25")
MsgBox msgStr
表中存储的数据为；
Name of the vendor is:" & vbNewLine & VendorName &
浏览 3提问于2013-02-19得票数 0
回答已采纳
我有一个表格，用户可以在其中为他们的数据库选择配色方案
ID | Colour | SelectedScheme
---|------------|--------------
1 | 136,207,39 | Yes
然后在我的表单上，我的current events选项卡上有以下内容
Dim RGBcolor As Long
RBGcolor = DLookup("Colour", "SelectedScheme")
Me.boxheader.BackColor = RGB(RGBcolor)
但我得到的是参数，而不是可选的错误。有什么想法吗？
浏览 4提问于2015-12-23得票数 0
1回答
我的代码有一个问题，当我单击登录表单的提交按钮时，会返回一个错误。
错误是“该对象不包括自动化对象‘tbl_tutor’”。
它显示了代码的哪一部分导致了错误；
[Forms]![frm_login]![Username]=[tbl_Tutor]![UserName]
这部分代码用于检查表tbl_Tutor的username字段中的用户名，但是我无法使其正常工作。
但是我不知道如何去解决这个问题。我为这个登录系统有两个单独的表，因为有一个教师和一个导师表，每个都有一个单独的登录用户名和密码，并在表单上的下拉列表中选择，然后用户名和密码被放入，然后表单将查找信息是否正确。我的代码可能是错误的，因
浏览 4提问于2015-05-12得票数 0
1回答
希望有人能帮我解决这个问题。我有两个表，如果其中包含一个值，则尝试从一个表中获取一个字段。
表1
Value Level
Officer C-Level
Exec C-Level
表2
Title Level2
Chief Executive C-Level (desired output)
Info Officer C-Level (desired output)
Oper Officer C-Level (desired output)
基
浏览 5提问于2022-03-12得票数 0
我想在means中设置用户登录访问权限，这意味着如果用户以管理员身份登录，它将显示一个不同的表单。
我试图获得userlevel，它是一个字符串，将显示类似"Admin"或"User"之类的内容，但它表示：
无效使用空
在这一行：
UserLevel = DLookup("UserSecurity", "tblUser", "[UserLogin] = ' " & Me.txtLoginID.Value & "'")
以下是完整的代码：
Private Sub
浏览 1提问于2019-06-02得票数 1
回答已采纳
在我的Access表单中，我有一个应该具有下列值的Text Box：
SELECT [QueryOne].[Company] FROM [QueryOne] WHERE ([QueryOne].[ID] = "1000"
因此，我在这个文本框的ControlSource中写入了以下字符串：
= ( SELECT [QueryOne].[Company] FROM [QueryOne] WHERE ([QueryOne].[ID] = "1000" )
但我得到的结果是textbox.value是#Name?。也许这个字符串不应该在ControlSource中
浏览 11提问于2018-01-05得票数 1
1回答
我有一个基于许多不同查询的报告。大多数查询都使用行的customerID文本框的值作为从其他字段中提取特定数据的键。
下面是其中一个文本框的Control Source属性：
=DLookUp([Level],[qryLevel],[Me].[customerID])
下面是qryLevel的SQL：
SELECT TOP 1 Level, myDate FROM sometable WHERE custID=Me.customerID ORDER BY myDate DESC
qryLevel在单独测试时可以正常工作，但DLookUp函数似乎不能正常工作，因为Access会给出一个对
浏览 2提问于2013-10-04得票数 0
1回答
我有一个挑战，只允许预订与平衡显示。我能够根据下面的语句筛选出欠款人，但在人员更新其付款的情况下，它会在状态字段中给出一个错误结果。有没有人可以帮我写一条语句，只允许我的field语句返回结果。下面是查询的SQL语句 SELECT "Print" AS Print, "Make Payment" AS MakePayment, tblBookingPayments.BookingPaymentID, tblBookings.GuestID_FK, tblBookingPayments.Discount,
CCur(DSum("[Amount]"
浏览 8提问于2020-07-07得票数 0
我试图在Access中的表单上使用DLookup作为ValidationRule，用于TextBox。
根据在上找到的一个例子，我使用了
dlookup("ABKUERZUNG", "tblABKUERZUNG", "ABKUERZUNG=[Forms]![frmMutBetriebspunkt]![BP_ABKUERZUNG]") is null
这不起作用：--您输入的表达式包含无效的语法。
现在，如果有人知道这个无效的语法到底是什么以及在哪里，我将非常感激。
谢谢雷内
编辑:纠正错误“to”(这不是问题的原因)
浏览 0提问于2009-11-03得票数 1
回答已采纳
2回答
我试图从一个表中返回一个货币值，我需要将变量传递给一个VBA定义的函数，该函数包含一个查询，以便获得正确的值。我有一个在表单的文本框中使用的函数，但它返回：
#Name?
任何帮助都是非常感谢的。代码如下：
Option Compare Database
Public Function payrollVar(dateVar As Date, roleidVar As String, typeVar As String) As DAO.Recordset
Dim dbs As DAO.Database
Dim rsSQL As DAO.Recordset
Dim strSQL As Stri
浏览 0提问于2018-09-06得票数 0
我不知道这是怎么回事，但我通常不是Access/VBA开发人员。
我有一个包含大约20个字段的数据库表，其中之一是“是/否”字段。我想使用DLookup提取Yes/No值，但是正在接收以下错误：
Run-time error '3075':
Syntax error (missing operator) in query expression 'Enabled'.
我正在使用的代码：
MsgBox (DLookup("Enabled", "Numbers", "ID = " & Me.cbxNumber.V
浏览 3提问于2014-09-18得票数 0
回答已采纳
我有个奇怪的问题，希望有人能解释清楚。在窗体的当前事件中，我有以下代码：
Me.lblDateRange.Caption = "Between " & DateAdd("yyyy", -3, Forms!frmContainer.subDiagnosis.Form!txtDateOfDiagnosis) & " and " & Forms!frmContainer.subDiagnosis.Form!txtDateOfDiagnosis & ""
基本上，标签需要显示用户必须咨询的三年日期范围。它一
浏览 0提问于2013-01-17得票数 0
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
云直播活动推荐
腾讯云开发者
