vb,d3d8 getting the wrong heigth

im not sure why i get the wrong height, the width loads right but not the height

VB Code:

Let tvBottom = rSrc.bottom / D3DSD.Height
    Let tuLeft = rSrc.Left / D3DSD.Width
    Let tuRight = rSrc.Right / D3DSD.Width
    Let tvTop = rSrc.Top / D3DSD.Height

the height is 2 pixels off why?

this is how i load

VB Code:

Public Sub File(ByVal D3DX As D3DX8, ByVal D3DD As Direct3DDevice8, ByVal Path As String, Optional ByVal ColorKey As Long)
    Set D3DT = D3DX.CreateTextureFromFileEx(D3DD, Path, D3DX_DEFAULT, D3DX_DEFAULT, 0, 0, D3DFMT_UNKNOWN, D3DPOOL_MANAGED, D3DX_FILTER_NONE, D3DX_FILTER_NONE, ColorKey, ByVal 0, ByVal 0)
    Call D3DT.GetLevelDesc(0, D3DSD)
End Sub