我常常会用到 Dim 总数 As Int16 = 10 Dim 记录数 As Int16 = 6 '得到要分几页 If 总数 / 记录数 = 总数 \ 记录数 Then Response.Write(总数 / 记录数) Else Response.Write(总数 \ 记录数 + 1) End If 一位同事的做法,看起来舒服些 If intTotalRec mod intPageSize = 0 Then n= intTotalRec \ intPageSize Else n= intTotalRec \ intPageSize+1 End If 相关文章: 2021-12-12 2021-12-07 2021-07-21 2022-01-19 2021-12-22 2021-12-28 2022-12-23 2021-06-29