Split a 'Decimal' in VB.NET

Question

I am sure this is a very simple problem, but I am new to VB.NET, so I am having an issue with it.

I have a Decimal variable, and I need to split it into

Answer 1

Simply:

DecimalNumber - Int(DecimalNumber)

Answer 2

You can use Math.Truncate(decimal) and then subtract that from the original. Be aware that that will give you a negative value for both parts if the input is decimal (e.g. -1.5 => -1, -.5)

EDIT: Here's a version of Eduardo's code which uses decimal throughout:

Sub SplitDecimal(ByVal number As Decimal, ByRef wholePart As Decimal, _
                 ByRef fractionalPart As Decimal)
    wholePart = Math.Truncate(number)
    fractionalPart = number - wholePart
End Sub

Answer 3

(As Jon Skeet says), beware that the integer part of a decimal can be greater than an integer, but this function will get you the idea.

    Sub SlipDecimal(ByVal Number As Decimal, ByRef IntegerPart As Integer, _
                    ByRef DecimalPart As Decimal)
        IntegerPart = Int(Number)
        DecimalPart = Number - IntegerPart
    End Sub

Use the Jon version if you are using big numbers.