有两个函数：Int 和 Fix。
创新互联拥有网站维护技术和项目管理团队，建立的售前、实施和售后服务体系，为客户提供定制化的网站制作、网站设计、网站维护、达州服务器托管解决方案。为客户网站安全和日常运维提供整体管家式外包优质服务。我们的网站维护服务覆盖集团企业、上市公司、外企网站、商城网站定制开发、政府网站等各类型客户群体，为全球1000+企业提供全方位网站维护、服务器维护解决方案。
Int 定义为返回不大于给定参数的最大整数值，如：
Int(3.9) = 3
Int(3.1) = 3
Int(3) = 3
Int(0) = 0
Int(-3) = -3
Int(-3.1) = -4
Int(-3.9) = -4
Fix 又称“截尾”函数。
即简单保留整数部分，如：
Fix(3.9) = 3
Fix(-3.9) = -3
如果需要“四舍五入”，则得巧妙利用 Int 函数：
Int(x + 0.5) 表示四舍五入到个位；
Int(x * 100 + 0.5) * 0.01 表示四舍五入到百分位（小数点后第二位）
date是一个类型。。。似乎不能赋值吧
由Sting转换成 Integer 可以这样写
dim a as string="adasdfsdfsferqwer"
dim b as integer
b= CUInt(a)
语法是正确的。。。但你要是把 几个字符转硬转换为 数字整型 但这几个字符串又不是数子 一定要出错的
如果是下面就没错了
dim a as string="45446464646"
dim b as integer
b= CUInt(a)
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
代码分析：
Math.Floor:返回小于或等于指定数字的最大整数。
Fix:返回数字的整数部分。
Math.Floor 和 Fix 函数都移除 Number 的小数部分并返回得到的整数值。
Math.Floor 和 Fix 函数之间的区别在于：如果 Number 为负，则 Math.Floor 返回小于或等于 Number 的第一个负整数，而 Fix 返回大于或等于 Number 的第一个负整数。例如，Math.Floor 将 -8.4 转换成 -9，而 Fix 将 -8.4 转换成 -8。
你的要求：如果你的要求是直接舍去，那么应当采用Fix方法，考虑到时负数的情况，那么采用Math.Floor将会出现非预期的结果。
测试结果：见附图。
欢迎交流。
直接用int就可以了。
int(2310.125)=2310
如果需要自定义格式输出,就要用tostring方法，比如：
2310.231.tostring("0")的结果就是2310。
如果你要去掉个位数，看来只有（2310.231/10).tostring("0")了。
详细的ToString里面的参数，请看MSDN。我查了一下，有，地址是：
Integer 变量以带符号的 32 位（4 个字节）整数形式存储，取值范围为 -2,147,483,648 到 2,147,483,647。
Integer 数据类型在 32 位处理器上提供最佳性能，此时较小的整型在内存中写入和读出的速度要慢一些。
可将 Integer 数据类型转换为 Long、Single、Double 或 Decimal，而不会出现 System.OverflowException 错误。
警告 如果您要建立与用 Visual Basic 6.0 编写的组件（例如自动化对象或 COM 对象）的接口，请牢记 Integer 在 Visual Basic 6.0 中具有不同的数据宽度（16 位）。若将一个 16 位参数传递给这样的组件，在 Visual Basic .NET 中应将其声明为 Short 而不是 Integer。
在文本后追加文本类型字符 I 可将其强制转换成 Integer 数据类型。在任何标识符后追加标识符类型字符 % 可将其强制转换成 Integer 数据类型。
等价的 .NET 数据类型是 System.Int32。