用vb编一个小程序

想编一个一运行,屏目上就有一朵花让后两朵 三朵 最后满屏都是,然后按Esc键退出运行. 要带码 ,还要注解.跟怎么做. 特别想学,求高手指点.学会重分感谢.
别光让我加分啊,写代码啊,谢谢了.对不起啊。走的时候忘改了。抱歉 。

'在窗体中画一个PICTUREBOX控件，并加载图片——你的那朵花
'画2个COMMAND按钮
Private Sub Command1_Click() '按一下按钮在窗体中随机打印一个图像
Dim curX As Long, curY As Long '当前打印位置
Randomize '开始参数随机数
curX = Rnd() * Me.ScaleWidth
curY = Rnd() * Me.ScaleHeight
Me.PaintPicture Picture1.Picture, curX, curY '打印图片到窗体
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Me.ScaleMode = 3 '窗体以像素为单位
Command2.Cancel = True '按ESC时执行Command2_Click（退出运行）
End Sub

我有一段代码
版权关系 这里不直接发了 你站$%%内$%%短%$%信联///////////#%%^/////系我吧
原理是复制窗体 设置随机位置
============
我都说我的代码是别人有版权的 我不能在这随便发 之前叫你站内PM一下我又不P 现在我出差在外 也没办法回你代码了 回家再算吧

VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 6495
ClientLeft = 60
ClientTop = 450
ClientWidth = 8790