以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  查询的实现  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122953)

--  作者:susu312
--  发布时间:2018/8/5 15:13:00
--  查询的实现


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

 

老师,foxtabel中这个查询是怎么做的呀?您可以给我一些类似的参考例子么


--  作者:有点甜
--  发布时间:2018/8/5 20:53:00
--  

参考

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=97302&skin=0

 

 


--  作者:susu312
--  发布时间:2018/8/5 21:34:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.StopRedraw() \'暂停绘制
lvw.View = ViewMode.Details \'显示模式为小图标
For Each dc As DataCol In DataTables("person").DataCols \'从数据表中提取数据
    Dim r As  WinForm.ListViewRow =  lvw.Rows.Add() \'增加一行
    r.Name = dc.Name \'设置标题
    r.Text=dc.Name
Next
lvw.ResumeRedraw() \'恢复绘制

 

 

老师,上图中,列那个绑定的一个下拉窗口,该窗口的afterload事件代码如上,但是 ,我在筛选窗口打开时,这个下拉窗口的内容为空?

请老师指导一下?

 

老师,我想实现成合foxtable一样高级筛选


--  作者:有点甜
--  发布时间:2018/8/5 22:39:00
--  
上传具体的实例测试,说明你做什么。
--  作者:susu312
--  发布时间:2018/8/5 22:43:00
--  

老师,我想做的就是foxtabel的高级筛选功能,我马上做例子给您


--  作者:susu312
--  发布时间:2018/8/5 22:53:00
--  

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目18.table

 

老师,

1、在连接那里是下拉框显示:And和Or

2、在列那里是下拉框显示:所有列名

3、在比较那里显示:大于、小于、等于等等

 

 


--  作者:有点甜
--  发布时间:2018/8/5 23:43:00
--  

1、请直接绑定表格,然后设置下拉

 

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

 

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

 

2、合成条件参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=96100&skin=0

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=97302&skin=0

 


--  作者:susu312
--  发布时间:2018/8/6 10:08:00
--  
以下是引用有点甜在2018/8/5 23:43:00的发言:

1、请直接绑定表格,然后设置下拉

 

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

 

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

 

2、合成条件参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=96100&skin=0

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=97302&skin=0

 

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("连接", Gettype(String), 32)
dtb.AddDef("列", Gettype(String),32)
dtb.AddDef("比较", Gettype(String), 32)
dtb.AddDef("内容", Gettype(String), 32)
With e.Form.Controls("Table1").Table
    .DataSource  = dtb.BuildDataSource()
    .AddNew()
    .grid.ScrollBars = 0 \'0 无 1 横向 2 纵向 3 横向纵向
    .Cols("连接").Width = 60
    .Cols("列").Width = 200
    .Cols("比较").Width = 60
    .Cols("内容").Width = 200
     .AllowEdit = True
End With

老师,我是临时生成的表,在临时表里面我不会绑定 ,您可以给我指导一下么?


--  作者:有点甜
--  发布时间:2018/8/6 10:16:00
--  

e.Form.Controls("Table1").Table.Cols("连接").Combolist = "And|Or"

e.Form.Controls("Table1").Table.Cols("列").Combolist = "第一列|第二列|第三列"

 

---------------

 

Dim str As String = ""
For Each c As Col In CurrentTable.Cols
    str &= c.name & "|"
Next
msgbox(str.trim("|"))


--  作者:susu312
--  发布时间:2018/8/6 12:35:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

 

老师:

 

1、上表中如何点击前三个的下了按钮触发增加下一行

2、清除是清除所有行,只保留第一行

3、删除时删除当前行

上面那几个按钮的代码我都不会写,请老师指点一下?