【例】设计如下图所示的界面，在窗体上画两个框架（Frame），分别在其中放置两组选项按钮（注意，移动框架时其中的选项按钮应能与框架一起移动），中间为一红色长方形。运行时，单击颜色按钮用于改变中间的图形的颜色（FillColor属性），单击形状按钮用于改变中间的图形的形状（Shape属性）,shape1的backStyle炫耀选择1。
图 改变图形的颜色与形状
程序源码：
' Option1～Option4为设置图形的颜色
Private Sub Option1_Click()
Shape1.BackColor = vbRed
End Sub
Private Sub Option2_Click()
Shape1.BackColor = vbBlue
End Sub
Private Sub Option3_Click()
Shape1.BackColor = vbGreen
End Sub
Private Sub Option4_Click()
Shape1.BackColor = vbYellow
End Sub
' Option5～Option8为设置图形的形状
Private Sub Option5_Click()
Shape1.Shape = 3 ' Circle-圆形
End Sub
Private Sub Option6_Click()
Shape1.Shape = 1 ' Square-正方形
End Sub
Private Sub Option7_Click()
Shape1.Shape = 0 ' Rectangle-长方形
End Sub
Private Sub Option8_Click()
Shape1.Shape = 2 ' Oval-椭圆形
End Sub