
visual basic6.0精简版用Circle方法画圆如何在圆内添充颜色?新手提问。
展开全部
用以下这三行代码,就可以画出一个红色的圆:
FillStyle = vbFSSolid
FillColor = vbRed
Circle (1000, 1000), 400
说明:FillStyle属性用来设置填充图案,赋值为vbFSSolid表示填充为实的;FillColor属性用来设置填充颜色,赋值为vbRed表示以红色填充。
FillStyle可以取下面这些值:
常数 设置值 描述
VbFSSolid 0 实填充
VbFSTransparent 1 (缺省值)透明
VbHorizontalLine 2 水平线
VbVerticalLine 3 垂直线
VbUpwardDiagonal 4 上斜对角线
VbDownwardDiagonal 5 下斜对角线
VbCross 6 十字线
VbDiagonalCross 7 交叉对角线
FillStyle = vbFSSolid
FillColor = vbRed
Circle (1000, 1000), 400
说明:FillStyle属性用来设置填充图案,赋值为vbFSSolid表示填充为实的;FillColor属性用来设置填充颜色,赋值为vbRed表示以红色填充。
FillStyle可以取下面这些值:
常数 设置值 描述
VbFSSolid 0 实填充
VbFSTransparent 1 (缺省值)透明
VbHorizontalLine 2 水平线
VbVerticalLine 3 垂直线
VbUpwardDiagonal 4 上斜对角线
VbDownwardDiagonal 5 下斜对角线
VbCross 6 十字线
VbDiagonalCross 7 交叉对角线
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询