Transparancy

Can I set the transparency of a sheet window to opaque ?
I used the following code to activate the sheet window :

Dim MagTherapieSearch As New ZoekMagTherapieWindow
MagTherapieSearch.ShowModalWithin(Self)

Put a rectangle in the back of the window and fill it with the standard window background color.

Tx Eli