分别设置shape控件的fillcolor和fillstyle属性,如下:Shape1.FillStyle = 0Shape1.FillColor = RGB(23, 34, 233)当然你还可以设置Shape属性,变换形状。 你是要填充色,不是背景色啊。