老师，窗口表以下代码设置了不显示滚动条没生效，哪儿有问题呢，代码也执行了？

With Tables("委托支付统计窗口_Table1")
    .DataSource = g.BuildDataSource()
    .DataTable.DataCols.Add("序号", Gettype(Integer))  \'新增序号列
    .DataTable.DataCols.Add("备注", Gettype(String))  \'新增序号列
    .Cols("序号").Move(0)
    For Each r As Row In Tables("委托支付统计窗口_Table1").Rows
        r("序号") = r.index+1
    Next
    .DefaultRowHeight  = 25 \'所有行高
    .DataTable.DataCols("付款金额").SetFormat("0.00")
    .Cols("序号").TextAlign = TextAlignEnum.Center     \'居中
    .Cols("款项类别").TextAlign = TextAlignEnum.Center \'居中
    .Cols("付款金额").TextAlign = TextAlignEnum.Right  \'右对齐
    .Cols("序号").Width = 60
    .Cols("款项类别").Width = 100
    .Cols("付款金额").Width = 120
    .ExtendLastCol = True  \'自动列宽
msgbox(1)
    .grid.ScrollBars = 0 \'禁止滚动条,0 无 1 横向 2 纵向 3 横向纵向
msgbox(2)
End With

我代码写到窗口加载后，直接统计后台所有数据，隐藏就没效，相同代码，我写到上面的项目名称筛选框，筛选不同的项目，就有效！

窗口打开后，在执行隐藏代码，又是有效的