随机生成不同的图形

一·实验目的

   为了实现随机生成不同的图形，满足题目需要，实现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，增加对其的兴趣。