随机生成不同的图形

一·实验目的

   为了实现随机生成不同的图形，满足题目需要，实现VB语言程序的运作，最后画出那令人满意的随机的不同图形。

二·实验内容

   在窗体上画一个commandbutton按钮，双击按钮编写程序语言
其语言如下：
Private Sub Command1_Click()

Show

Me.Scale (0, 0)-(18, 8)

Me.AutoRedraw = True

Me.DrawMode = 2

Circle (3, 4), 3, vbRed

Me.AutoRedraw = False

Line (7, 1)-Step(4, 6), vbGreen, B

Line (13, 7)-Step(4, 0), vbBlue

Line Step(0, 0)-Step(-2, -6), vbBlue

Line Step(0, 0)-Step(-2, 6), vbBlue
End Sub
点击运行即可

三·心得体会

通过网络来学习，学会自主学习。

四·遇到的问题及解决问题的方法

打错编码，不明白VB语言。上网查。

五·没有解决的问题

听不懂，不能自主运用VB，增加对其的兴趣。