Foxtable(狐表)用户栏目专家坐堂 → 如何根据表数据 利用代码生成任务栏数据


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

主题:如何根据表数据 利用代码生成任务栏数据

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110746 积分:563656 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/18 17:46:00 [显示全部帖子]

动态添加导航:


比如 
With Forms("窗口1").Controls("TopicBar1").Pages
for each s as string = datatables("某表").getvalues("任务名称")
   dim p = .Add(s,s,"")
for each s2 as string = datatables("某表").getvalues("子任务","任务名称='" & s & "'")
   p.Links.Add(s2,s2)
next 
next 
End With

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110746 积分:563656 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/19 20:24:00 [显示全部帖子]

1、

GetValues(ColumnName,Filter,Sort)

ColumnName:列名称,从此列中提取不重复的值。
Filter:     可选参数,指定一个条件表达式,只返回符合此条件的值;请参考表达式的运算符和函数 和 条件表达式
Sort:       可选参数,指定排序列,如果省略,则根据取值列排序,通常无需设置。


2、With Forms("窗口1").Controls("NavBar1").NavPages


 回到顶部