Foxtable(狐表)用户栏目专家坐堂 → 去尾法


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

主题:去尾法

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


加好友 发短信
等级:二尾狐 帖子:513 积分:3935 威望:0 精华:0 注册:2012/6/26 13:23:00
去尾法  发帖心情 Post By:2014/4/18 14:16:00 [只看该作者]

dr("装坯合格率")=Math.Round(sum/sum1,2)

我只想保存两位数,第三位数不进行四舍五入。


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/4/18 14:19:00 [只看该作者]

Dim d As Double=5.28345
MessageBox.show( Math.Floor(d*100)/100)

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/4/18 14:26:00 [只看该作者]

Select e.DataCol.Name
    Case "第一列"
        Dim value As String = CStr(e.DataRow(e.DataCol))
        If value.Contains(".") Then
            e.DataRow(e.DataCol) = value.SubString(0,value.LastIndexOf(".") + 3)
        End If
End Select

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


加好友 发短信
等级:二尾狐 帖子:513 积分:3935 威望:0 精华:0 注册:2012/6/26 13:23:00
  发帖心情 Post By:2014/4/18 15:15:00 [只看该作者]

知道了,谢谢

 回到顶部