请教Dlookup相关的问题

有一个表 里面含有姓名 番号 的字段名

在做了查询 窗体之后

希望在窗体中的番号输入之后失去焦点后，后面的名前文本框中自动显示对应的姓名

我写的语法是

Private Sub 番号_LostFocus()
Dim abc As String
abc = DLookup("名前", "クエリ1", "[番号]='" & Me![番号] & "'")
Me.[名前] = abc
End Sub

结果总是说Dlookup这句有错误

请问 这句错在哪里？该怎么写？

谢谢。