以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  指定的内容隐藏  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176052)
--  作者：yifan3429
--  发布时间：2022/3/28 20:31:00
--  指定的内容隐藏
Dim v1() As String = {"sys_日期","sys_log","sys_姓名","sys_部门","权限组"}
For Each v As String In v1
If .Cols.Contains(v)
 .Cols.Remove(v)
End If
Next
 

上面在 AfterOpenProject 做了隐藏
下面的代码在 ComboBox 还是会显示

Dim TextBox As WinForm.ComboBox
TextBox = e.Form.CreateControl("模糊搜索", ControlTypeEnum.ComboBox)
TextBox.Text = "当前表内容模糊搜索"
TextBox.ForeColor = Color.LightBLue
TextBox.Left = TextBox1.Left
TextBox.Top = 5
TextBox.Width =240
TextBox.Height = 30
Dim s1 As String = ""
For Each frm As Col In MainTable.Cols
    s1 &= frm.name & "|"  
Next
TextBox.ComboList = s1.trim("|") 
e.Form.AddControl(TextBox)

怎么排除 sys_日期","sys_log","sys_姓名","sys_部门","权限组  呢


--  作者：有点蓝
--  发布时间：2022/3/28 20:43:00
--  
使用非开发者登录测试：