时间戳

首页 > 解决方案 > 使用变量时 Dsum 的结果不相加

vba - 使用变量时 Dsum 的结果不相加

问题描述

DSum我在使用变量时得到错误的答案。如果我放了一个修复信息，如果它得到正确的答案。

我如果喜欢这个工作正常

xDefect = Nz(DSum("[defects]", "PO_Details", "Fornecedor = 'QMY'"), 0)

结果 QMY10

如果我使用变量

Dim xForner As Variant
Dim xDefect As Byte

xForner = Me.Fornecedor

xDefect = Nz(DSum("[defects]", "PO_Details", "Fornecedor = ' & xforner & '"), 0)
MsgBox "missing:" & xForner & xDefect

结果 QMY0

标签： vbams-access

解决方案

您必须连接变量：

xDefect = Nz(DSum("[defects]", "PO_Details", "Fornecedor = '" & xforner & "'"), 0)

推荐阅读