Foxtable(狐表)用户栏目专家坐堂 → 指定行


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

主题:指定行

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/21 16:26:00 [只看该作者]

g2.Groups.AddDef("期初日期")
ws.cells(5+n,4).value = r10("期初日期")

统计日期应如何改

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/21 16:28:00 [只看该作者]

 你要改成什么?你要做什么效果?上传实例说明。

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/21 16:30:00 [只看该作者]

按日期相同的进行统计

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/21 16:32:00 [只看该作者]

 看不懂你想表达的意思,用实例说明。

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/24 15:46:00 [只看该作者]

Dim d1 As String = e.Form.Controls("TextBox1").text
Dim t As Table = Tables("工资摘要")
Dim g1 As New GroupTableBuilder("统计表1",DataTables("工资摘要"))
g1.Groups.AddDef("摘要")
For i As Integer = 3 To t.cols.count-2
    g1.Totals.AddDef(t.Cols(i).Name)
Next
g1.Filter = "[代码].substring(0,2) = d1.substring(4,2) "
g1.Build()
上述代码中:g1.Filter = "[代码].substring(0,2) = d1.substring(4,2) "应如何改?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/24 16:08:00 [只看该作者]

g1.Filter = "substring(代码, 1, 2) = '" & d1.substring(4,2) & "'"

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/27 9:07:00 [只看该作者]

Dim drs1 As List(of DataRow) = DataTables("工资.工资明细表").Select("","序号")
For i As Integer = 0 To drs1.Count - 1
    drs1(i).BaseRow("_SortKey") = i
Next
请问老师:上述关联表的排序应如何改?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/27 9:21:00 [只看该作者]

直接对子表进行操作,就是对关联表操作啊

 

Dim drs1 As List(of DataRow) = DataTables("工资明细表").Select("","序号")
For i As Integer = 0 To drs1.Count - 1
    drs1(i).BaseRow("_SortKey") = i
Next

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/27 10:43:00 [只看该作者]


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

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:8981 威望:0 精华:0 注册:2013/10/24 9:12:00
  发帖心情 Post By:2016/6/27 10:44:00 [只看该作者]

如何将代码中前两位01.改主摘要201601,即是201601.01。。。。。。。。。。。。。201601.01.01.01.01?

 回到顶部
总数 147 上一页 1 2 3 4 5 6 7 8 9 10 下一页 ..15