وظائف VBA: Int و Fix

وصف

ترجع الدالتان VBA Int و Fix جزءًا صحيحًا من الرقم.

بناء الجملة Int و Fix

Int (رقم)

Fix (رقم)

مثال VBA Int و Fix

استخدام الدالتين Int و Fix لتحويل أنواع مختلفة من القيم الرقمية ، مما يساعدك أيضًا على فهم الفرق بشكل أفضل عند التعامل مع القيم السالبة:

Sub IntFixExample()

    MsgBox Int(1)      'العوائد: 1
    MsgBox Fix(1)      'العوائد: 1
    
    MsgBox Int(-1)     'العوائد: -1
    MsgBox Fix(-1)     'العوائد: -1
    
    MsgBox Int(2.9)    'العوائد: 2
    MsgBox Fix(2.9)    'العوائد: 2
    
    MsgBox Int(-2.9)   'العوائد: -3
    MsgBox Fix(-2.9)   'العوائد: -2
    
    MsgBox Int(4.5)    'العوائد: 4
    MsgBox Fix(4.5)    'العوائد: 4
    
    MsgBox Int(-4.5)   'العوائد: -5
    MsgBox Fix(-4.5)   'العوائد: -4
    
    MsgBox Int(0.424)  'العوائد: 0
    MsgBox Fix(0.424)  'العوائد: 0
    
    MsgBox Int("13")   'العوائد: 13
    MsgBox Fix("13")   'العوائد: 13
    
    MsgBox Int("-4.5") 'العوائد: -5
    MsgBox Fix("-4.5") 'العوائد: -4
    
    MsgBox Int(True)   'العوائد: -1
    MsgBox Fix(True)   'العوائد: -1
    
    MsgBox Int(False)  'العوائد: 0
    MsgBox Fix(False)  'العوائد: 0
    
End Sub