扇形代码（扇形是啥图形）

本篇文章给大家谈谈扇形代码，以及扇形是啥图形对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、求计算机图形学画扇形全部代码？
• 2、用java编写扇形
• 3、java画扇形？求大神啊，具体如下，跪谢啦
• 4、vb 画扇形
• 5、vb画扇形源代码

求计算机图形学画扇形全部代码？

void CDrawtest1View::OnMouseMove(UINT nFlags, CPoint point)

{

// TODO: Add your message handler code here and/or call default

if (m_bDraw)

{

CClientDC dc(this);

dc.SetROP2(R2_COPYPEN);

CPen pen(PS_SOLID,1,RGB(255,0,0));

CPen *pOldPen = dc.SelectObject(pen);

dc.MoveTo(m_ptStart);

dc.LineTo(m_ptEnd);

dc.LineTo(point);

m_ptEnd = point;

dc.SelectObject(pOldPen);

}

CView::OnMouseMove(nFlags, point);

}

全部太多垃圾。关键部分作参考吧。

用java编写扇形

Random ra = new Random();//随机数

int m = ra.nextInt(5);//产生1到5之间的随机数

System.out.print(m);//输出

然后根据不同的值，显示不同的颜色

java画扇形？求大神啊，具体如下，跪谢啦

写了一个小例子，color处不好实现，因为在代码中没法识别red是那种颜色，除非你加入字符串数组，判断red是第几个，然后在设置颜色。

?xml version="1.0" ?

arc

    back w="500" h="400" color="red"/

    drawshanxing cx="50" cy="50" r="50" from="100" to="200"/

    drawshanxing cx="150" cy="50" r="50" from="0" to="200"/

    drawshanxing cx="50" cy="150" r="50" from="0" to="45"/

    drawshanxing cx="150" cy="150" r="50" from="180" to="270"/

    drawshanxing cx="50" cy="250" r="50" from="90" to="135"/

    drawshanxing cx="150" cy="250" r="50" from="45" to="32"/

/arc

这个是配置文件，命名为arc.xml

vb 画扇形

'添加窗体Form1,Picture1,然后添加如下代码:

Private Sub Form_Load()

    Me.Show

    Dim angleN, stepN, originX, originY As Double

    stepN = 0.01

    originX = 2500

    originY = 2500

    For angleN = 3.134952627 * 3 / 4 To 3.134952627 / 2 Step -stepN

        Picture1.Line (originX, originY)-(originX + 1000 * Sin(angleN), originY + 1000 * Cos(angleN)), vbRed

    Next

    Picture1.Line (originX, originY)-(originX + 1000 * Sin(3.134952627 * 3 / 4), originY + 1000 * Cos(3.134952627 * 3 / 4)), vbGreen

    Picture1.Line (originX, originY)-(originX + 1000 * Sin(angleN), originY + 1000 * Cos(angleN)), vbGreen

    Picture1.Circle (originX, originY), 1000, vbGreen, 0, 3.14 / 4

End Sub

vb画扇形源代码

代码如下.单击窗体即可.

＝＝＝＝＝＝＝＝＝＝＝＝

Const pi = 3.1416

Private Sub Form_Click()

FillColor = vbRed

FillStyle = vbSolid

Circle (200,200),200,vbRed,-pi / 2,-pi

End Sub

扇形代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于扇形是啥图形、扇形代码的信息别忘了在本站进行查找喔。