下载此文档

Vb中画五角星方法.doc

文档分类：通信/电子 | 页数：约2页举报非法文档有奖

1/2

下载提示

1.该资料是网友上传的，本站提供全文预览，预览什么样，下载就什么样。
2.下载该文档所得收入归上传者、原创者。
3.下载的文档，不会出现我们的网址水印。

同意并开始全文预览

(约 1-6 秒)

1/2 下载此文档

文档列表 文档介绍

Vb中画五角星方法(1)、新建一个VisualBasic标准工程,设置窗体的Caption属性为“画五角星”。(2)、在窗体上添加两个按钮,如图所示(3)、窗体的load事件程序代码如下:==10000(4)两个按钮的程序代码如下:mand1_Click()Dimxa,ya,x1,y1,y2,x3,y3,x4,y4,x5,y5Scale(-8000,8000)-(8000,-8000)Constπ==5000xa=R*Cos(18*π/180)ya=R*Sin(18*π/180)xb=R*Cos(54*π/180)yb=R*Sin(54*π/180)x1=-xa:y1=yaX2=xa:y2=yax3=-xb:y3=-ybx4=0:y4=Rx5=xb:y5=-ybLine(x1,y1)-(X2,y2),RGB(255,0,0)Line(X2,y2)-(x3,y3),RGB(255,0,0)Line(x3,y3)-(x4,y4),RGB(255,0,0)Line(x4,y4)-(x5,y5),RGB(255,0,0)Line(x5,y5)-(x1,y2),RGB(255,0,0)mand2_Click()(4)、运行,并保存程序。(运行结果如图)图图

Vb中画五角星方法来自淘豆网www.taodocs.com转载请标明出处.

Vb中画五角星方法.doc

Vb中画五角星方法

五角星画法教程

三维五角星的画法

五角星画法教程

五角星画法教程

五角星画法教程

五角星的画法

画五角星

画五角星