vb.net向上求整 vb中向上取整

如何用vb.net语言，将AutoCAD里的坐标系Y轴方向，即变向上为正转为向下为正。

工具 -新建-z轴矢量。在再你要变坐标的地方的一点 点击一下让z轴向上，就可以了。

主要从事网页设计、PC网站建设（电脑版网站建设）、wap网站建设（手机版网站建设）、自适应网站建设、程序开发、微网站、小程序开发等，凭借多年来在互联网的打拼，我们在互联网网站建设行业积累了丰富的成都网站设计、做网站、网络营销经验，集策划、开发、设计、营销、管理等多方位专业化运作于一体，具备承接不同规模与类型的建设项目的能力。

在vb中，给一个整形变量赋了浮点形值，程序是会向下取整，向上取整，还是什么？

只会保留整数位，就是你说的向下取整。不信你可以试一试把一个double类型的转换为int类型的试试。

vb.net有没有向上取整的函数

不是函数，是使用Math类的Ceiling方法

Dim MyNumber As Double = 2.000000001

MsgBox(Math.Ceiling(MyNumber))

关于VB.net取整的问题

double是双精度 有效数值位52位 表示成指数的形式 即指数11位 即表示成

所以180.89305用2进制表示是10110100.1110010010011110111011001011111110110001010110110101

即

180.89305在double中存在的实际数值是

1.01101001110010010011110111011001011111110110001010110110101 *2^7

取小数点后 52位有效值后 等于10进制的180.893049999999998

所及加最后变成了 1808930.99999999998

第一次当然输出近似值1808931

第二次int函数去掉了小数点后的数int就是只取整数的部位的不是四舍五入 所以少了1

vb.net 从数组{5,7,11,13,17,19}中取一个数，取三次（可以是相同的数），三次之和有几个值？求代码！

Sub 和()

Dim Arr, Dic As Object, i, j, k

Set Dic = CreateObject("Scripting.Dictionary")

Arr = Array(5, 7, 11, 13, 17, 19)

For i = 0 To UBound(Arr)

For j = 0 To UBound(Arr)

For k = 0 To UBound(Arr)

Dic(Arr(i) + Arr(j) + Arr(k)) = ""

Next k

Next j

Next i

MsgBox Dic.Count

Set Dic = Nothing

End Sub

结果为22种不同的和值。

VB中有没有向上与向下取整函数

Int、Fix 函数

返回参数的整数部分。

语法

Int(number)

Fix(number)

说明

Int 和 Fix 都会删除 number 的小数部份而返回剩下的整数。

Int 和 Fix 的不同之处在于，如果 number 为负数，则 Int 返回小于或等于 number 的第一个负整数，而 Fix 则会返回大于或等于 number 的第一个负整数。例如，Int 将 -8.4 转换成 -9，而 Fix

将 -8.4 转换成 -8。