If User.Group = "开发者" Then
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
End If
If User.Name = "jialing" Then
DataTables("表A").LoadFilter = "第1列 = '" & "嘉陵区" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "shunqing" Then
DataTables("表A").LoadFilter = "第1列 = '" & "顺庆区" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "gaoping" Then
DataTables("表A").LoadFilter = "第1列 = '" & "高坪区" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "langzhong" Then
DataTables("表A").LoadFilter = "第1列 = '" & "阆中市" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "nanbu" Then
DataTables("表A").LoadFilter = "第1列 = '" & "南部县" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "xichong" Then
DataTables("表A").LoadFilter = "第1列 = '" & "西充县" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "yingshan" Then
DataTables("表A").LoadFilter = "第1列 = '" & "营山县" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "pengan" Then
DataTables("表A").LoadFilter = "第1列 = '" & "蓬安县" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
Else If User.Name = "yilong" Then
DataTables("表A").LoadFilter = "第1列 = '" & "仪陇县" & "'" And
DataTables("表A").LoadFilter = "第14列 = 0 and 第3列 Is Not Null"
End If
DataTables("表A").Load()
报错说不是表达式。请教大神!!!!严重感谢!!