运行时错误 3021-没有当前记录

2023-11-22

我想将查询结果链接到文本框,但出现此错误:这是我的代码:

Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT XValue, YValue,Wert FROM tb_DCM_Daten WHERE (FzgID=" & Forms!frm_fahrzeug!ID & " AND Name='" & List2.Value & "')")
Text10.Text = rst!XValue //error in this line

应该返回大约 20 条记录

为什么会出现此错误以及如何解决它?


该错误的一个可能原因是Name是 Access 中的保留字,因此您应该使用

... & " AND [Name]='" & ...

您还可以测试rst.EOF在尝试使用之前rst!XValue。也就是说,要验证您的查询是否返回至少一行,您可以添加代码

If rst.EOF Then
    MsgBox "The Recordset is empty."
End If

紧接着.OpenRecordset称呼。如果记录集is空,那么您需要验证您的 SQL 语句,如 @GregHNZ 在上面的评论中所述。

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

运行时错误 3021-没有当前记录 的相关文章

  • 使用VBA复制垂直列并沿对角线粘贴

    我有一列数据 我们称之为 A 列 其中有 35 行数据 如何在此列上循环 然后将每个数据点粘贴到另一张工作表中 同时为每个循环循环增加列和行 换句话说 我寻求对角粘贴在第二张纸中 有没有一种简单的方法可以在 VBA 中执行此类操作 不要循环
  • 通过单击按钮将 Access 中的数据获取到 C# 中的文本框中

    我在 MS Access 中有一个表 其中包含 FoodID FoodName Price 在 C 中 我有三个文本框 txtId txtName txtPrice 和一个按钮 btnSearch 我的问题是 在 C 中 我只需在 txtI
  • 导出到 Excel 时如何避免“数字存储为文本”

    当我将表格从 Access 导出到 Excel 时 所有数字都显示为文本 并且单元格上有绿色箭头 有没有办法自动修复此错误 或者有另一种导出方法可以解决该错误 作为参考 这是我导出的方式 DoCmd TransferSpreadsheet
  • 无法使用 RODBC 附加到具有自动编号列的表

    我正在尝试使用 RODBC 将新行插入到 Microsoft Access 数据库中的表中 问题是主键列是一个自动编号 它似乎不允许我省略此列 我正在使用带有append TRUE 的sqlSave 函数和带有单行的数据框 我已经尝试过以下
  • VBA - HTML 抓取问题

    我正在尝试从网站上抓取拍卖数据https www rbauction com heavy equipment auctions https www rbauction com heavy equipment auctions 我当前的尝试是
  • 在 Excel 表格中选择多列的代码

    我是 Excel VBA 新手 我需要修改我的代码 以便我能够进一步进行 我想在 Excel 表格中选择多个表格列 这是我的代码 Dim ws As Worksheet Dim tbl As ListObject Set ws Sheets
  • MS Access 中重命名列的 DDL 是什么?

    在 MS Access 中重命名列的 DDL 是什么 大致如下 alter table myTable rename col1 to col2 它不适用于 MSAccess 2000 格式的数据库 我正在将 OLEDB 或 ADO NET
  • VBA 中的多线程

    这里有人知道如何让VBA运行多线程吗 我正在使用 Excel 无法用 VBA 本地完成 VBA 构建在单线程单元中 获得多个线程的唯一方法是使用 VBA 之外的其他具有 COM 接口的东西构建 DLL 并从 VBA 调用它 信息 OLE 线
  • VBA 中的匈牙利语好吗?

    我在 Net 中不使用匈牙利语 str int 前缀 但我仍然发现它在 VBA 中很有用 因为在 VBA 中很难看到类型 这很糟糕吗 不必要 也许我错过了一些东西 我真的很感激任何反馈 我想知道有一段时间了 谢谢大家 我想说 这种匈牙利符号
  • 输入新行并复制上面单元格中的公式

    我正在尝试创建一个 Excel 宏来执行以下操作 在文档末尾输入新行 复制上面单元格中的公式 到目前为止我有这个 Sub New Delta Go to last cell Range A4 Select Selection End xlD
  • 标志状态的 VBA 替换

    根据文档 Outlook 中的 MailItem FlagStatus 属性是已弃用 https msdn microsoft com en us library microsoft office interop outlook maili
  • 检查未绑定控件是否具有值的正确方法

    简单场景 一个表单和一个文本框 未绑定 Text1 If lt gt Text1 Then MsgBox Not Empty End If 上面的代码有效 表达方式 lt gt Text1如果文本框包含字符 则计算结果为 True 无论文本
  • 使用 FindElementbyXpath() 获取 Selenium Basic 中可填充框的行和列名称

    我正在使用 Selenium Basic 将电子表格中的文本填充到网站中 网站的html代码是这样的 div table cellspacing 0 border 1 style width 99 tr th style font weig
  • 在 Excel 中使用 VBA 设置图像透明度

    有没有办法使用 VBA 脚本对图像应用一些透明度 我录制了一个 宏 但似乎没有录制艺术效果 我已经找到了如何制作形状 但没有找到图像 这需要几个步骤 将自选图形 如矩形 放置在工作表上 使用以下方法将您的实际图片嵌入矩形中 ShapeRan
  • MS ACCESS 计数/求和行数,不重复

    我有下表 我需要计算总行数而不包括任何重复记录 CustomerID test1 test1 test2 test3 test4 test4 如您所见 总行数为 6 但有两个 test1 和两个 test4 我希望查询返回 4 IOW 我想
  • 使用 XMLHTTP 进行抓取会在特定类名处引发错误

    我正在尝试使用此代码抓取网站以提取姓名和联系人 Sub Test Dim htmlDoc As Object Dim htmlDoc2 As Object Dim elem As Variant Dim tag As Variant Dim
  • 如何在vb.net中实现事务方式?

    我使用 VB net 200 开发一个连接到 MS Access 数据库的应用程序 我使用 TableAdapter 和 Dataset 连接到 Access DB 文件 我需要实现一个简单的事务方法 提交 回滚 来保存到数据库 有没有一种
  • Excel - 公式或宏根据链接到另一个单元格的另一个单元格填充单元格

    在 Excel 中 我试图根据其他两个单元格中包含的值创建一个单元格 我需要单元格 X 和 Y 来获取基于单元格 L 和 的数据 就像这样 X Y L 1 2 3 4 5 6 A 6 1 1 6 1 6 1 7 1 7 2 7 2 8 1
  • 如何在缩进层次结构中找到父级?

    我目前有一张 Excel 工作表 其中包含缩进的项目层次结构 如下所示 每个项目都缩进 每个缩进四个空格 以显示它如何适应整体层次结构 我已经能够创建一个 级别 列 将缩进级别转换为数字 Item Level Parent P1 1 N A
  • 使用图表时避免使用“激活”和“选择”(Excel)

    我知道使用Activate and Select在 Excel 中 VBA 不是最佳实践 我看过有关如何在处理范围时避免它们的参考资料 例如 LINK https stackoverflow com questions 10714251 e

随机推荐

  • 为什么访问令牌会过期?

    我刚刚开始使用 Google API 和 OAuth2 当客户端授权我的应用程序时 我会获得一个 刷新令牌 和一个短暂的 访问令牌 现在 每次访问令牌过期时 我都可以将刷新令牌发布给 Google 他们会给我一个新的访问令牌 我的问题是访问
  • 如何从以下 .htaccess 重写规则中排除特定文件类型?

    如何从以下重写规则中排除特定文件类型 xml 和 txt RewriteEngine On RewriteBase RewriteCond REQUEST FILENAME f RewriteCond REQUEST URI Rewrite
  • 如何为 Windows 安装 libjpeg?

    我下载了一些使用 libjpeg 的代码 但源文件中不包含 dll 我试图使其正确编译 执行 我使用的是VS2010 在我的源文件中我有 include jpeglib h and in Linker gt Input gt Additio
  • 使用 C# 中的函数返回两个字符串[重复]

    这个问题在这里已经有答案了 我有一个函数想要返回两个值 这可能吗 这是我的代码 但它似乎不喜欢我想返回两个值 public string PlayerCards string player1C1 string player1C2 gener
  • 无法连接到 Kubernetes 集群中的 mongodb 服务

    我在 Google Cloud 上有一个 Kubernetes 集群 有一个数据库服务 它在 mongodb 部署之前运行 我还有一系列微服务 它们正在尝试连接到该数据存储 然而 他们似乎找不到主人 apiVersion v1 kind S
  • Intellij 13 鼠标悬停解决方案上弹出的自动文档不再起作用[重复]

    这个问题在这里已经有答案了 我一直在使用这个解决方案适用于 IntelliJ 12 用于在鼠标悬停时自动弹出快速文档 但是新版本的 IntelliJ 13 当你设置auto show quick doc true in the idea p
  • Durandal:在合成过程中显示“正在加载...”

    当 activate 方法执行其操作时 我可以轻松地显示加载消息 如下所示 div div class text center style margin 75px i class fa fa spinner fa spin i div di
  • 使用 mamp 在本地测试电子邮件

    首先 我对这种本地主机服务器设置完全陌生 过去几天我一直在试图解决这个问题 但没有运气 我正在开发一个带有电子邮件表单的 php 网站 我在一个MAC using codekit and 免费的MAMP一切正常 现在我的问题是 是否可以在本
  • .Net 超时:WaitForSingleObject 与 Timer

    我正在异步操作 一系列网络 IO 上实现超时 但我不确定哪个 更好 从分配 性能 的角度来看 创建 EventWaitHandle 并使用 RegisterWaitForSingleObject 或者只是创建一个 Timer并使用它的Tic
  • 为什么没有 cv2.waitkey() 则 cv2.imshow() 不会渲染?

    如果没有 cv2 waitkey 方法 cv2 imshow 将显示黑色窗口 为什么不等待就无法正常渲染 cap cv2 VideoCapture video path while cap isOpened ret frame cap re
  • 如何在 Swing 应用程序中隐藏光标?

    有没有办法隐藏光标 除了使用透明图像作为光标之外 当用户将鼠标指向 JFrame 中的 JPanel 之外时 我想隐藏光标 看来Cursor类一开始就没有 空白 光标 因此可以使用以下命令定义一个新的 空白 光标Toolkit create
  • 在SQS队列中使用许多消费者

    我知道可以使用多个线程来使用 SQS 队列 我想保证每条消息都会被消耗一次 我知道可以更改消息的可见性超时 例如等于我的处理时间 如果我的进程花费的时间超过可见性超时 例如连接速度慢 其他线程可以使用相同的消息 保证消息被处理一次的最佳方法
  • 检查字符串是否为回文

    A 回文是一个单词 短语 数字或其他单位序列 可以在任一方向以相同的方式阅读 为了检查一个单词是否是回文 我获取该单词的字符数组并比较字符 我测试了它 它似乎有效 但我想知道这是否正确或者是否有需要改进的地方 这是我的代码 public c
  • Laravel 简单月份选择

    y 尝试从日期字段 fechas 日期时间类型 检索月份 其中使用 SQL 子句 MONTH 进行测试不起作用 感谢您的回复 data DB table ordenes gt select array DB raw cant ped pre
  • 用于按月计算计数的 SQL 查询

    将一列中的 1 12 连接到一组按月计数的好方法是什么 在 SQL 中 SELECT months count whatever1 count1 count whatever2 count2 FROM months LEFT JOIN wh
  • MVC 站点具有特定要求的细化权限

    我不喜欢内置的会员提供商 我决定自己动手 我正在尝试想出一种在操作级别执行授权的好方法 这是我的要求trying前往 属性使用 我喜欢这个 因为它在调用堆栈中控制在非常高的级别 并且是组织权限的好地方 没有魔法字符串 这就是我远离当前角色提
  • Prolog 中的 Switch 语句

    在 Prolog 谓词中 我经常编写像这样的重复条件语句 但我希望它们可以写得更简洁 output Lang Type Output Lang javascript gt Output function Type Lang ruby gt
  • 适用于平板电脑的 Android 应用程序仍显示“专为手机设计”

    我发布了一个应用程序 http bit ly 1GfKsNG 仅适用于平板电脑 AndroidManifest xml调整方式为
  • 如何重写 Haskell 中一些基本类型的 Show 实例?

    我正在用 Haskell 编写一些程序 处理许多基本类型 如 Word32 Word64 等 我经常使用ghci来测试功能 在终端中查看结果 为了方便快捷 我总是以十六进制显示数据 例如 data Human M Int F Int ins
  • 运行时错误 3021-没有当前记录

    我想将查询结果链接到文本框 但出现此错误 这是我的代码 Dim rst As DAO Recordset Set rst CurrentDb OpenRecordset SELECT XValue YValue Wert FROM tb D