Foxtable(狐表)用户栏目专家坐堂 → 添加控件


  共有4421人关注过本帖树形打印复制链接

主题:添加控件

帅哥哟,离线,有人找我吗?
kaituozhe
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
添加控件  发帖心情 Post By:2015/10/16 9:39:00 [显示全部帖子]

增加一个窗口高级筛选,想在这个窗口实现以下功能:

1、打开窗口时能够自动加载已经增加过控件

2、增加控件,用于高级筛选;

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:产品3.zip


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 9:48:00 [显示全部帖子]

筛选条件及表名在加载事件中怎么写呀

 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 10:03:00 [显示全部帖子]

我在项目中增加了一个表,表中有筛选条件一栏,能把筛选条件添加到控件的click事件中吗(动态的)?你在那个例子中给我做一个吗?帮助中也没有,真不知道该怎么下手。

 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 10:15:00 [显示全部帖子]

把这个代码写到表里吗

 


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 10:27:00 [显示全部帖子]

把代码写入表中,其他的在那里写


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 11:08:00 [显示全部帖子]

做了一个,不行呀,该怎么做呢,在例子里详细做一下吧
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:产品3.zip


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 11:48:00 [显示全部帖子]

这个可以了,但是筛选出来的只是已经加载的数据,没有加载的数据没有显示,另外我也想把筛选出来的数据显示到窗口table中

 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 12:56:00 [显示全部帖子]

Code = Tables("高级筛选_table & n") = & " dr("筛选条件") "

点选择按钮,增加一个页面,增加一个table 把筛选的结果显示在新页面上,我写了一些代码,写不好,


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 12:57:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:产品4.zip


 回到顶部
帅哥哟,离线,有人找我吗?
kaituozhe
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/16 13:10:00 [显示全部帖子]

Add(e.sender.Name , e.sender.Name ) 增加页面
If Typeof e.sender Is winform.Button Then
    Dim dr As DataRow = DataTables("高级筛选").find("筛选名称= '" & e.sender.Name & "'")
    If dr IsNot Nothing Then
        Functions.remove("函数")
        Dim Code As String
        Code = dr("筛选条件") 
        Code = Tables("高级筛选_e.sender.Name ) = & " dr("筛选条件") "
        Functions.Add("函数",Code)
        Functions.Complie()
        Functions.Execute("函数")
    End If
End If

 回到顶部
总数 28 1 2 3 下一页