在VB中建立了一个工程,画了3个圆,如何给3个圆填充红黄绿3种颜色? 10
1个回答
展开全部
Private Sub Command1_Click()
Me.FillStyle = vbSolid
Me.FillColor = vbRed
Me.Circle (300, 300), 300, vbRed
Me.FillColor = vbYellow
Me.Circle (800, 800), 300, vbYellow
Me.FillColor = vbGreen
Me.Circle (1300, 1300), 300, vbGreen
End Sub
Me.FillStyle = vbSolid
Me.FillColor = vbRed
Me.Circle (300, 300), 300, vbRed
Me.FillColor = vbYellow
Me.Circle (800, 800), 300, vbYellow
Me.FillColor = vbGreen
Me.Circle (1300, 1300), 300, vbGreen
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询