Visual Basic程序设计教程 作者 何振林 7995.pptVIP

⑶菜单编辑器的使用 ⑷ 菜单项增减 在程序运行时，菜单随时增减，如“文件”菜单能保留最近打开的文件数。这同控件数组一样，使用菜单数组。步骤如下： 　　①在菜单设计时，加入一个菜单项，其Index为0(菜单数组)，Visible为False。 　　②在程序运行时，通过Load方法向菜单数组增加新的菜单项。同样，要删除所建立的菜单项，使用UnLoad方法向菜单数组减少菜单项。 ⑸ 弹出菜单(快捷菜单) ⑴绘制李萨如曲线，其函数如下： 七、上机实验补充题 ⑵用Circle方法在窗体上绘制由圆环构成的艺术图案，如右图所示。 提示：本题的算法如下：等分半径为r的圆周为n份，以等分点为圆心，半径r1绘制n个圆。为此，首先要确定圆心坐标(x0,y0)，然后在确定圆周上一点 (x1,y1)，如右下图所示，所示有以下公式： x1=x0+x=x0+r*cos(θ) 其中：0 ≤θ≤2π y1=y0+y=y0+r*sin(θ) x y 主要程序代码如下：Private Sub Form_Click() Const PI = 3.1415926 Dim r, x, y, x0, y0 r = Form1.ScaleHeight / 4 指定圆的半径 x0 = Form1.ScaleWidth / 2