电脑VB的题目.急急急!!!!

翻译???注释??? Private Sub Command1_Click() CommonDialog1.showcolor '弹出颜色对话框 Picture1.ForeColor = CommonDialog1.Color '设置picture1的前景色 End Sub Private Sub Command2_Click() Picture1.Cls '清除picture1的内容