专业报表取数与实际顺序不一致 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 专业报表取数与实际顺序不一致

共有3437人关注过本帖树形打印复制链接主题：专业报表取数与实际顺序不一致

kaituozhe

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/13 0:36:00 [显示全部帖子]

通过以下代码设置资产负债表

Dim nms As List (of String) = DataTables("会计科目").GetValues("资产部类","资产部类 is not null","[_Identify]")

For n As Integer = 0 To nms.Count-1

msgbox(nms(n))

rt.Cells(n,0).text = nms(n)

'If nms.Contains(" & like"空" & ") Then

'rt.Cells(n,0).text = Nothing

'Else

'rt.Cells(n,0).text = nms(n)

'End If

Dim tb As Table = Tables("资产负债表已审")

Dim nms1 As List (of String ) = DataTables("会计科目").GetValues("负债部类","负债部类 is not null","[_Identify]")

For n1 As Integer = 0 To nms1.count-1

rt.Cells(n1,6).text = nms1(n1)

从会计科目表的调取的项目名称顺序与实际报表中项目名称的顺序不一致，且无法导出word格式的是什么原因

kaituozhe

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/13 0:38:00 [显示全部帖子]

例子的三张报表分别是报表模板、导出PDF格式、导出WORD格式的

下载信息 [文件大小：下载次数： ]
点击浏览该文件:新建文件夹.zip

kaituozhe

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/13 0:42:00 [显示全部帖子]

顺序的问题已解决，另外报表中有些需要保留的空行，我通过以下代码解决，但是提示错误，标颜色的地方该怎么改

'If nms.Contains(" & like"空" & ") Then

'rt.Cells(n,0).text = Nothing

'Else

'rt.Cells(n,0).text = nms(n)

'End If

kaituozhe

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/13 0:57:00 [显示全部帖子]

保留空行的问题已解决，怎么导不出来word格式还没有解决

kaituozhe

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/17 10:34:00 [显示全部帖子]

做了一个专业报表，在生成专业报告后点保存选择word格式，然后再打word格式的报表显示是空的，什么也没有？

kaituozhe

小大 16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/31 22:25:00 [显示全部帖子]

用以下代码提取的顺序与表实际顺序不一致，怎么办？

Dim lis As List (of String) = tb.DataTable.GetValues("户名","户名 is not null","[_sortkey]")

kaituozhe

小大 17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/3/31 23:06:00 [显示全部帖子]

Dim lis As new List (of String) '= tb.DataTable.GetValues("户名","户名 is not null","[_sortkey]")

For Each r As DataRow In tb.DataTable.dataRows

If lis.Contains(r("户名")) = False Then

lis.add(r("户名"))

End If

以上两段代码效果一样，什么原因呀？

kaituozhe

小大 18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2234 积分：15284 威望：0 精华：0 注册：2015/7/18 10:10:00

Post By：2016/4/1 7:37:00 [显示全部帖子]

例子中户名能够按顺序排列但是我实际中的不能，不知道是什么原因？第二个问题是想如果户名是无户名无账号但是按交易明细的分类分别填写标签，但是内容都集中在一个标签中了，怎么办？例如如交易汇总户名列是无户名无账号，但是按交易明细的交易内容（现支、消费

下载信息 [文件大小：下载次数： ]
点击浏览该文件:增加相应行.foxdb

）分别统计并作标签显示

下一主题 >> << 上一主题

总数 19 上一页 1 2

主题：专业报表取数与实际顺序不一致