以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  查询表自定格式代码顺序  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142866)

--  作者:狐表(小白)
--  发布时间:2019/11/7 18:12:00
--  查询表自定格式代码顺序
老师,你好!查询表在设置加载样式(颜色、背景色、行高、列宽、标题行、字体......)有没有先后顺序,什么规律?为什么同一行代码,调换位置后有时不行,也不报错!
[此贴子已经被作者于2019/11/7 18:12:02编辑过]

--  作者:有点蓝
--  发布时间:2019/11/8 8:43:00
--  
请举例说明
--  作者:狐表(小白)
--  发布时间:2019/11/8 11:51:00
--  

比如由SQLsever数据库视图生产的查询表(table1、table2、table3)设置3个表的行号列宽度代码放在afterload其它代码前不执行调整也不报错,只有放在窗口afterload所有代码后面才能执行调整,但是计时器执行自动翻页后行号列宽度又恢复原样了,也不报错,表的其它行列设置(背景、标题、字体、颜色、以及定义变量、提取数据筛选条件、指定每页显示行数)都能正常执行。


\'设置行号列宽度代码

Tables(e.form.name & "_Table1").grid.cols(0).width= 2 \'grid.cols(0).width

Tables(e.form.name & "_Table2").grid.cols(0).width= 2 \'grid.cols(0).width

Tables(e.form.name & "_Table3").grid.cols(0).width= 2 \'grid.cols(0).width


--  作者:有点蓝
--  发布时间:2019/11/8 13:39:00
--  
数据加载(datatable.load)后,设置会回到默认状态。所以需要在加载后重新调用设置的代码才行的
--  作者:狐表(小白)
--  发布时间:2019/11/8 13:46:00
--  
谢谢!原来如此!
--  作者:狐表(小白)
--  发布时间:2019/11/8 17:13:00
--  
老师,加载代码我写在翻页按钮chick里面了,你给看看有没有问题,另外重新调用的代码写在哪个事件的哪个位置?谢谢!

chick代码:
With DataTables("主窗口_table1")
    If .LoadPage < .TotalPages - 1
        .LoadPage = .LoadPage  + 1
    Else
        .LoadPage = .Totalpages
        DataTables("主窗口_table1").Load()  
        .LoadPage = 0
    End If
    .Load()
    e.Form.Controls("TextBox").Value = (.LoadPage + 1) & "/" & .TotalPages
End With

--  作者:有点蓝
--  发布时间:2019/11/8 17:19:00
--  
放到.Load()之后即可
--  作者:狐表(小白)
--  发布时间:2019/11/8 17:42:00
--  
谢谢!