访问 VBA SQL 案例代码

Question

IM 尝试通过序列号查找分配的项目，如果找到，则将 table 记录的名字和姓氏（分配给它的人）更改为存储并打印出错误消息 uf ut doesn't .它还需要处理 VBA 语法中的所有引号，这对我来说不是。代码乱

strSQL = "SELECT FirstName,LastName Case [serialnumber] WHEN serialnumber = '& s' & _
"THEN FirstName = 'Storage' AND LastName = Null ELSE 'Record Not Found!'" & _
"FROM [Trial Invetory]"

s 是存储用户输入的变量

s = InputBox("Enter Unit Serial Number", "Add unit to storage", Default)

Answer 1

Access 不支持 case 语句。查看 IIf 函数以了解 Access 中的类似功能。

Answer 2

Access 支持 IIF function，可以在 SQL 查询中使用。

strSQL = "SELECT IIF([serialnumber]='& s','Storage', 'Record Not Found!') AS FirstName, IIF([serialnumber]='& s', NULL, LastName)" & vbcr & _
"FROM [Trial Invetory]"

访问 VBA SQL 案例代码

Access VBA SQL Case Code

sql

ms-access

vba

case