主题：显示排序标志问题

加载窗口代码“Tables("窗口1_Table1").DataSource = DataTables("表A")

窗口控件代码：

Dim Filter As String
With e.Form.Controls("姓名")
    If .text IsNot Nothing Then
        Filter = "姓名 = '" & .text & "'"
    End If
End With
If Filter > "" Then
    Tables("窗口1_Table1").Filter = Filter '筛选
End If
Tables("窗口1_Table1").Sort = "日期 DESC" '排序

我在表A表样式中设置显示排序标记=False，但是在窗口1中加入的表A还是有排序标记，怎样去除排序标记，谢谢