VB编程:取整函数Int、CInt、Fix区别-30

运行效果:
1、正整数取整:
VB编程:取整函数Int、CInt、Fix区别-30

2、负整数取整:
VB编程:取整函数Int、CInt、Fix区别-30

学习心得:
    1、从例子中可以看到:
    Int()按照数轴向下取整;
    CInt()四舍五入,取了最近的一个整数;
    Fix()无论什么情况,只取整数部分。

程序代码:
Private Sub Command1_Click()
 If Text1.Text <> "" Then
        Text2.Text = Int(Text1.Text)
        Text3.Text = CInt(Text1.Text)
        Text4.Text = Fix(Text1.Text)
    End If
End Sub