主题：狐表如何只去整数部分而不四舍五入啊

表达式看来是不接受mod运算，所以无法通过表达式列获取数据，改为数据列，参考代码：

If e.DataCol.Name = "第一列" Then
    Dim edr As DataRow = e.DataRow
    If e.NewValue IsNot Nothing Then
        If   edr("第一列") Mod 15 > 0
            edr("第二列") = (edr("第一列") - edr("第一列") Mod 15 ) /15 +1
        Else
            edr("第二列") = edr("第一列") /15
        End If
    Else
        edr("第二列") = Nothing
    End If
End If