[求助]打印报表小数位数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]打印报表小数位数

共有2498人关注过本帖树形打印复制链接主题：[求助]打印报表小数位数

hanlingli111999

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

加好友

发短信

等级：童狐帖子：260 积分：1957 威望：0 精华：0 注册：2020/3/7 22:50:00

[求助]打印报表小数位数 发帖心情

Post By：2020/11/18 8:30:00 [只看该作者]

蓝老师好，我专业报表中要保留小数位数，其中的”重量“和“油漆面积”列需保留2位小数，

下面的代码为全部列保留小数位数，怎么修改一下代码呀

rt.Cells(r + 1, c).Text = format(tb.Rows(r)(ColNames(c)),"0.00")

有点蓝

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

加好友

发短信

等级：超级版主帖子：106414 积分：541217 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/11/18 8:50:00 [只看该作者]

if ColNames(c) = ”重量“ orelse ColNames(c) = ”油漆面积“

rt.Cells(r + 1, c).Text = format(tb.Rows(r)(ColNames(c)),"0.00")

else

rt.Cells(r + 1, c).Text = tb.Rows(r)(ColNames(c))

end if

hanlingli111999

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

加好友

发短信

等级：童狐帖子：260 积分：1957 威望：0 精华：0 注册：2020/3/7 22:50:00

Post By：2020/11/18 9:06:00 [只看该作者]

谢谢老师

hanlingli111999

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

加好友

发短信

等级：童狐帖子：260 积分：1957 威望：0 精华：0 注册：2020/3/7 22:50:00

Post By：2020/11/18 14:37:00 [只看该作者]

老师好，上午您给的代码我修改了部分专业报表，问题已解决，可对于带小计和合计的专业报表

我还搞不了，请您帮助，非常感谢

1.要求“重量t”和“油漆面积㎡”列保留两位小数

2.小计和总计部分“重量t”和“油漆面积㎡”列保留两位小数

hanlingli111999

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

加好友

发短信

等级：童狐帖子：260 积分：1957 威望：0 精华：0 注册：2020/3/7 22:50:00

Post By：2020/11/18 14:38:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:打印(1).foxdb

有点蓝

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

加好友

发短信

等级：超级版主帖子：106414 积分：541217 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/11/18 14:45:00 [只看该作者]

1、完全一样的方法，参考2楼自己改

2、小计和总计使用format格式化即可，就是1楼的用法

hanlingli111999

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

加好友

发短信

等级：童狐帖子：260 积分：1957 威望：0 精华：0 注册：2020/3/7 22:50:00

Post By：2020/11/18 15:35:00 [只看该作者]

完全搞定，谢谢老师

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

主题：[求助]打印报表小数位数