小位数过多，怎么处理？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 小位数过多，怎么处理？

共有2515人关注过本帖树形打印复制链接主题：小位数过多，怎么处理？

白国栋

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

等级：幼狐帖子：176 积分：1689 威望：0 精华：0 注册：2017/3/26 10:20:00

小位数过多，怎么处理？ 发帖心情

Post By：2019/7/22 10:39:00 [只看该作者]

此主题相关图片如下：1.png

有点酸

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

等级：五尾狐帖子：1093 积分：6682 威望：0 精华：0 注册：2013/7/1 9:05:00

Post By：2019/7/22 10:44:00 [只看该作者]

你可以对统计结果进行四舍五入或取整。

白国栋

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

等级：幼狐帖子：176 积分：1689 威望：0 精华：0 注册：2017/3/26 10:20:00

Post By：2019/7/22 11:14:00 [只看该作者]

Dim msj As WinForm.TopicPage = fll.Pages("盟市")

msj.Links.Clear

For Each msjfl As String In DataTables("词典").GetComboListString("名称","分类 = '盟市'","_identify").Split("|")

Dim kg As String = new String(" ",24 - msjfl.Length*2) '定义前面的对齐空格

Dim msm As Double = DataTables("小班调查表").Compute("sum(上报面积)","盟市 = '" & msjfl & "'") '定义统计盟市的数量

msj.Links.Add(msjfl,msjfl &"(" & msm & "亩)") '合成标题

不知道放哪里好呢？

有点蓝

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

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

Post By：2019/7/22 11:23:00 [只看该作者]

msj.Links.Add(msjfl,msjfl &"(" & format(msm,"0.00") & "亩)")

白国栋

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

等级：幼狐帖子：176 积分：1689 威望：0 精华：0 注册：2017/3/26 10:20:00

Post By：2019/7/22 11:43:00 [只看该作者]

谢谢！！

主题：小位数过多，怎么处理？