Sub Main()
Dim Result As Long
    Result = Multiply(564231, 897)
End Sub