Access 語法錯誤（操作符丟失）在查詢錶達式 字段名 中 的解決辦法

幫客戶做的一箇Access數據庫管理繫統中，齣現一箇比較特彆的錯誤

就是隻要是數據錶子窗體，使用內置的篩選功能，就是在字段右邊的小箭頭打開的篩選功能，都會提示以下錯誤：

Access 語法錯誤（操作符丟失）在查詢錶達式 字段名 中

Access Form - Syntax error (missing operator) in query expression

經過無數次的嚐試，終於找到原因

是因爲字段名中包含有空格，而且空格後麵的名稱Code Name Number等都是Access的保留字

如果窗體綁定的數據源直接是錶名： 如 tblTest， 則篩選正常

如果窗體綁定的數據源是查詢，或SQL語句，如Select  * from tblTest ,則齣錯

我的第一想法是在查詢中將 字段名前後加 [],但髮現沒有任何作用

解決辦法：

1.將字段名中的空格全部去掉，改成CompanyCode CompanyName 這樣卽可 （但如果 查詢 窗體 代碼已經做好瞭，再修改錶，那工作量就太大瞭） 這種一般是軟件設計初期可以採用。

2.如果不改字段名，將窗體中控件的控件源 的Company Code , 改爲 [Company Code]

   註意，在查詢或窗體數據源中改字段名 加  [ ] 沒有用

  這種比第1種改動要小一點。   不過如果窗體比較多，窗體控件也比較多的話，這種方法也是比較纍的   

因爲涉及的窗體太多，實在不想手工逐箇來修改，所以做瞭一箇小工具，用代碼來批量替換

'將窗體中所有控件的控件源名稱加上[ ],以解決字段名中包含空格帶來的問題
Private Sub Command0_Click()
Dim frm As Form
Dim ctr As Control
Dim strFormName As String
strFormName = "frmFXEXT_Sub" '要替換控件源的窗體名稱
DoCmd.OpenForm strFormName, acDesign, , , , acHidden '打開窗體到設計視圖,且隱藏打開
Set frm = Forms(strFormName)
For Each ctr In frm.Section(acDetail).Controls '循環所有主體裡的控件
If Not (TypeOf ctr Is Label) Then  '排除標籤控件 （隻處理文本框 組閤框 列錶框 複選框 多選項等控件）
If Left(ctr.ControlSource, 1) <> "[" Then  '如果控件源是[開對，就代錶已經轉換過瞭，就不再重覆轉換
ctr.ControlSource = "[" & ctr.ControlSource & "]" '沒有轉換的，就是字段名前後加上  [ ]
End If
End If
Next
DoCmd.Close acForm, frm.Name, acSaveYes  '保存窗體
End Sub