The D3DRECT type is a rectangle definition.
Type D3DRECT { x1 As Long x2 As Long y1 As Long y2 As Long End Type
Direct3DDevice7.Clear