填充好的矩形如何指定成内部透明

填充好的矩形怎么指定成内部透明?
With OWork.ActiveDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 120, 40).Fill 
  .ForeColor.RGB = RGB(255, 255, 255) '白色 
  .BackColor.RGB = RGB(255, 50, 0) '红色 
  .TwoColorGradient msoGradientHorizontal, 1 
End With 


这段代码画出了一个矩形 矩形内部填充的颜色从红到白渐变 

如果我要指定矩形内部是透明 就是不带任何颜色 连白色都不是 请问该怎么写啊 

谢谢

[解决办法]
.Transparency = 1 '设置形状为透明

[解决办法]
支持，接分