在窗体上建立一个单选按钮组Option1和一个图片框Picture 1，如图所示。当选择不同的单选按钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。

Private Sub Option1_Click(______)
Dim H.W
Picture1.Cls
Picture1.FillStyle=______
W=Picture1.ScaleWidth/2
H=Picture1.ScaleHeight/2
Picture1.Circle(W,H),W/2
End Sub

巴黎公社在1871年4月16日颁布法令，规定“把一切企业主已经逃跑或已停业的工厂和作坊交给工人协作社，同时保证企业主有权获得补偿”。上述材料表明巴黎公社（）

A.把部分工厂变为集体所有的同时尊重和保护私有财产

B.已经建立了社会主义的经济基础

C.普遍实行社会主义公有制

D.建立了社会主义性质的 * *