上海计算机二级vb考试大题画图专项练习.pdf
版权申诉
83 浏览量
2022-07-14
01:32:17
上传
评论
收藏 515KB PDF 举报
练习 1
选择“产生圆” 菜单项，在图形框内按每 0.1 秒频率随机产生色彩随机变化、半径最大为
图形框 10%的圆；
Private Sub Timer1_Timer()
Randomize
X = Picture1.ScaleWidth * Rnd
Y = Picture1.ScaleHeight * Rnd
z = Int(16 * Rnd)
r = 0.1 * X
Picture1.Circle (X, Y), r, QBColor(z)
End Sub
练习 2
单击 Form2 窗体（见图 13-4）上的“画图” 菜单项，用 Pset 方法绘制参数方程：
SinrCosyCosrCosx 4,4
在 2~0 之间的图形，其中 r 为半径，取图形框
的高度（或宽度）的一半；选择“返回” 菜单项，回到 Form1 窗体。
Private Sub Menu21_Click()
r = Picture1.ScaleHeight / 2
x0 = Picture1.ScaleWidth / 2
y0 = Picture1.ScaleHeight / 2
For i = 0 To 2 * 3.1415926 Step 0.01
X = r * Cos(4 * i) * Cos(i) + x0
Y = r * Cos(4 * i) * Sin(i) + y0
Picture1.PSet (X, Y)
Next i
End Sub
练习 3
Shape 控件可用来画矩形、正方形、椭圆、圆、圆角矩形及圆角正方形，通过其 shape属性
可确定所需要的形状， Fillstype 属性为形状指定填充的图案， FillColor 属性为形状着色。由
于本题要求设置成一个圆，则其 Shape 属性设置为 3；要求圆中无填充图案，所以 FillStyle
属性设置为 0；要求圆为红色，所以 FillColor 设置为 VbRed。
练习 4
单击“绘图”命令按钮，定义 Picture1 的坐标系为（ -2，2）-（2，-2），在图形框 Picture1
绘制方程 y=1-x
2
和 y=x 所包围的面积图形 （两线交点对应 x 的值约为 -1.6 和 0.6，在区间 [-1.6，
0.6]用 Line 方法，区间外用 Pset 方法）。
gy51338424
- 粉丝: 0
- 资源: 11万+
下载权益
C知道特权
VIP文章
课程特权
VIP享7折，此内容立减4.47元 开通VIP
相关推荐
资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！
点击此处反馈
评论0
最新资源