Foxtable(狐表) → 用户栏目 → 专家坐堂 → 将指定的行、列单元格内容按顺序合并到一个单元格


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

主题：将指定的行、列单元格内容按顺序合并到一个单元格
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/8/31 13:36:00 [显示全部帖子]

dim s as string
for i as integger = 0 to 8
s = s & tables("a").rows(i)("f") & tables("a").rows(i)("g")
next
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/8/31 14:37:00 [显示全部帖子]

使用select获取符合条件的行：http://www.foxtable.com/webhelp/topics/0400.htm

 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/8/31 14:52:00 [显示全部帖子]

遍历select的结果啊

Dim drs As List(Of DataRow)
drs = DataTables("订单").Select("[产品] = 'PD01' And [日期]= #1/4/1999#")
Dim s As String
For Each dr As Datarow In drs
   s = s &  dr("xxxx") 
Next
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/1 10:42:00 [显示全部帖子]


 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/1 11:01:00 [显示全部帖子]

在认真理解一下

例如要计算某个产品的销售数量，要计算的产品名称由用户输入，假定输入的结果保存在全局变量Vars("产品")中：

Dim Sum As Integer
Sum =  DataTables("订单").Compute("Sum(数量)", "[产品] = '" & Vars("产品") & "'")

Compute的第二个参数为计算条件表达式，该表达式分为三部分:

"[产品] = '" & Vars("产品") & "'"

假定全局变量Vars("产品")的值为PD01， 组合三部分的内容后，这个表达式就等效于：

"[产品] = 'PD01'"
 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/1 11:03:00 [显示全部帖子]

drs = DataTables("工具表").Select("[合并标志] = '" & e.DataRow("项目辅助") & "'")

 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/1 11:55:00 [显示全部帖子]

完整代码呢..............

 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110766 积分：563762 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/9/1 13:50:00 [显示全部帖子]

这种不叫完整代码，也就半成品

请上传实例说明
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05078 秒, 5 次数据查询