访问VBA SQL案例代码

Question

IM尝试按序列号查找已分配的项目，如果找到，则将表记录的名字（名称为其分配给的人）更改为存储，并打印出错误消息uf ut doesnt。它还需要使用VBA语法中的所有引号，这对我来说不适用。代码很乱

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

是存储用户输入的变量

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

Answer 1

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

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

Answer 2

Access不支持案例陈述。查看IIf函数以获取Access中的类似功能。