Rounding Down to the nearest tenth of a double value

I have review ratings that, in the database are stored as a money value (the reason that I do this is that I've had many issues with decimals).

What I am trying to do is round down the value in the code behind to round down to the nearest tenth value. Currently in the code behind I make the money value a double and am using the round function and the format function to get my decimal to the nearest tenth. However I'm not getting the value that I want because I want to round down to the nearest tenth (i.e. I have 4.95, I want 4.9, etc.)

Here's my current code which is not correct:

       Dim x As Double
        x = 4.95
        x = System.Math.Round(x)
        x = Format$(x, "0.0")Start Free Trial