主题：[求助]语句哪里出错了

请问：语句哪里出错了

写了N多次了

此主题相关图片如下：7f098vqsqy%iabh2jxz5eq.jpg

 

If e.IsFocusCell AndAlso e.Col.Name = "计量单位" Then
    '    e.Col.Combolist = DataTables("User_Dict").GetComboListString("列表值", "[字典分类]= '" & "计量单位" & "' And ([使用用户]  Like '*" & e.Row("New_User").Trim() & ",*' " & " Or [使用用户]  Like '*" & "所有用户" "*')" )
   
    e.Col.Combolist = DataTables("User_Dict").GetComboListString("列表值", "[字典分类]= '" & "计量单位" & "'" & _
    "And (" & "[使用用户]  Like '*"  & e.Row("New_User").Trim() & ",*' " & _
    " Or "  & "[使用用户]  Like '*"  & "所有用户" & "*' "  & ")" , "显示顺序")

End If

看起来没问题,也许是长代码换行的问题,不要使用换行看看.

If e.IsFocusCell AndAlso e.Col.Name = "计量单位" Then
    e.Col.Combolist = DataTables("User_Dict").GetComboListString("列表值","[字典分类] = '计量单位' And [使用用户] Like '*" & e.Row("New_User").Trim() & "*' Or " & _
    "[使用用户] Like '*所有用户*'","显示顺序")
End If