circle方法应用.pptVIP

* 柘城县职业教育中心 * 柘城县职业教育中心 教学重点： 1.circle方法的属性 2.circle方法的应用 教学难点： circle方法的属性 教学方法: 讲授法、讨论法、演示法 任务1描述： 在本任务中演示的是通过circle方法在窗体上绘制圆、椭圆和扇形。 圆 椭圆 扇形 Circle方法参数： 在本任务中，通过调用circle方法在图像框中绘制出圆，椭圆和扇形。 Circle方法用于在对象上画圆、椭圆或弧。 Circle方法的语法格式为： Object. Circle [step] ( x , y ), radius , [ color ,start , end ,aspect ] 其中object是一个可选参数，用于指定执行circle方法的对象，如果省略该参数，则以当前具有焦点的窗体作为执行对象。 Step 是一个可选项，用此项可将圆、椭圆或弧的中心指定为相对坐标，参考点的坐标即为当前对象的currentX和currentY属性值。 （ x ，y） 和 radius 都是必选参数，它们的值为单精度浮点数。 （x ，y ）用于指定圆、椭圆或弧的中心坐标。 Radius用于指定圆、椭圆或弧的半径。 圆心坐标和半径所用的度量单位由对象的scalemode属性决定，默认值为1，此时的度量单位是缇（twip） Color是一个可选参数，其值是一个长整型数，用于指定圆周的RGB颜色，可以用visual basic预定义的符号常量来设置color参数，也可以用RGB函数或QBcolor函数指定颜色。如果省略color参数，则使用窗体的forecolor属性值。 Start，end和aspect也都是可选参数，它们的值为单精度浮点数。Start和end以弧度为单位，取值范围为-2∏~2 ∏。当弧、部分圆活椭圆画完以后，这两个参数指定弧的起点和终点的位置。起点的默认值为0，指点的默认值为2 ∏。Aspect参数用于指定圆的纵横尺寸比，其默认值为1.0（标准圆），当参数不等于1时，将画出椭圆。 aspect = 纵半径 横半径 1 竖椭圆 1 横椭圆 Object. Circle [step] ( x , y ), radius , [ color ,start , end ,aspect ] 横轴 纵轴 （x，y） 横半径 纵半径 设计步骤： 1.在visual basic集成开发环境中创建一个exe工程。 2.将窗体form1的caption属性设置为“绘制圆、椭圆和扇形”。 3.在窗体form1上添加以下空间。 图像框空间picture1，将 其backcolor属性设置为白色。 4个命令按钮控件，其caption属性分别设为“画圆”、“画椭圆”、“画扇形”和“退出”。 4.在窗体form1的代码窗口中编写以下事件过程。 Private sub command1_click() Picture1.cls ‘清空图像框 Picture1.drawwidth=2 ‘设置绘线宽度 Picture1.circle(1567,1567),1000,qbcolor(12) ‘绘制标准圆 End sub Private sub command2_click() Picture1.cls Picture1.drawwidth=2 Picture1.circle(1567,1567),1000,qbcolor(12) , , ,0.5 ‘绘制横向椭圆 End sub Private sub command3_click() Picture1.cls Const pi=3.1415926 Picture1.drawwidth=2 Picture1.circle(1567,1567),1000,qbcolor(12),-pi/4,-7*pi/4 ‘绘制扇形 End sbu Private sub command4_() Unload me ‘退出系统 End sub 单击command1按钮，在图像框内显示半径为1000的标准圆。 单击command2按钮，在图像框内显示横向半径为1000，纵向半径为500的椭圆。 单击command3按钮，在图像框内显示横向半径为1000的扇形。 任务2描述： 在本任务中演示的是通过circle方法在窗体上绘制几个太极图。 太极图 任务分析： 通过设置circle方法的参数设置，综合圆弧，圆绘制出几个太极图。 设计步骤： 1. 在visual ba