Inputnumber Help

The number is rounded.
So
0.7143 gives 1
0.4143 gives 0
0.5001 gives 1
0.5 gives 0
0.4999 gives 0

Best regards.

Thanks Klaus
Its the zero (0) of the number 0.7143 I was requiring not the decimals.
I'm obviously using the wrong function to retrieve it.
original code:
InputNumber = txtdismiles.text
txtwholemiles.Text = NumberFormat(InputNumber,1,0)

txtdismiles.text = 0.7143
txtwholemiles.text is returning result as 1 instead of 0

thanks
Rob