Question

即時通訊嘗試通過序列號查找已分配的項目，如果找到，則將表記錄的姓名（分配給其的人員）更改爲存儲並打印出錯誤消息。它還需要使用它不適合我的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

訪問支持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不支持case語句的變量。在Access中查看IIf功能的類似功能。