我认为您需要在用户
'string'中使用单引号将其作为。另外，我一直使用
set db = currentdb而不是使用
as
Public Sub testSub(user as string)Dim db as DAO.DatabaseDim sqlstr as Stringset db = CurrentDBsqlstr = "UPDATE tTable1 SET Field1 = '" & user & "' WHERe Field1 IS NULL;"db.Execute sqlstrEnd Sub
编辑：正如@jarlh所提到的，我同意，我认为方括号不是必需的
