以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  SetColVisibleWidth("部门受案号|180|姓名|80")，如何将不在这个范围内的列也显示出来呢？这些列不用设定宽度！  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=133822)
--  作者：李孝春
--  发布时间：2019/4/21 13:15:00
--  SetColVisibleWidth("部门受案号|180|姓名|80")，如何将不在这个范围内的列也显示出来呢？这些列不用设定宽度！
Dim tb1 As WinForm.Table = e.Form.Controls("Table1")
Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd1.C
cmd1.CommandText = "S ELECT * From {案件基本信息} where 操作单位 =  \'" & _usergroup & "\'"
dt1 = cmd1.ExecuteReader()
tb1.Table.DataSource  =dt1
tb1.Table.Cols.Frozen=2
tb1.Table.SetColVisibleWidth("部门受案号|180|姓名|80")

现在已经实现冻结两列  其他字段我不想设定宽度  但是也需要显示出来  怎么弄呢？
比如表中还有  受理日期  承办人  承办单位  移送机关等字段
[此贴子已经被作者于2019/4/21 13:18:32编辑过]
--  作者：有点色
--  发布时间：2019/4/21 17:09:00
--  

1、移动列

 

http://www.foxtable.com/webhelp/scr/0587.htm

 

2、显示隐藏列

 

http://www.foxtable.com/webhelp/scr/0572.htm

 
--  作者：李孝春
--  发布时间：2019/4/21 17:58:00
--  回复：（有点色）1、移动列 http://www.foxt...
Dim tb1 As WinForm.Table = e.Form.Controls("Table1")
Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd1.C
cmd1.CommandText = "S ELECT * From {案件基本信息} where 操作单位 =  \'" & _usergroup & "\'"
dt1 = cmd1.ExecuteReader()
tb1.Table.DataSource  =dt1
tb1.Table.Cols.Frozen=2
tb1.Table.SetColVisibleWidth("部门受案号|180|姓名|80")

老师  在这样的情况下  二楼的显示列与隐藏列有效么？不是绑定表哦！
--  作者：有点色
--  发布时间：2019/4/22 12:02:00
--  

 

同样有效，你现在写了什么代码？有什么问题？

 

 
--  作者：李孝春
--  发布时间：2019/4/22 15:10:00
--  回复：（有点色） 同样有效，你现在写了什么代...
Dim tb1 As WinForm.Table = e.Form.Controls("Table1")
Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd1.C
cmd1.CommandText = "S ELECT * From {案件基本信息} where 操作单位 =  \'" & _usergroup & "\'"
dt1 = cmd1.ExecuteReader()
tb1.Table.DataSource  =dt1
tb1.Table.Cols.Frozen=2
tb1.Table.SetColVisibleWidth("部门受案号|180|姓名|80")

现在已经实现冻结两列  其他字段我不想设定宽度  但是也需要显示出来  怎么弄呢？
比如表中还有  受理日期  承办人  承办单位  移送机关等字段
--  作者：有点甜
--  发布时间：2019/4/22 15:19:00
--  

设置显示出来啊

 

http://www.foxtable.com/webhelp/scr/0572.htm