【好的追加50】急~~~~VB,E语言的程序设计问题！！

可以使用VB，或者E语言来设计！我帮朋友弄一个！前提是可以运行 且达到指定目的的！追加50分！！！
首先：
1.vb或者E语言的代码！
2.需要讲指定的图片【10张】载入 一个方框
3.然后，点击按钮“开始” 那么 本程序就会随即转动图片！
4.然后当点击按钮“停”后！图片停止转动
5.类似于抽奖！
6.这个图片的来源！有2种“可以是 打开-图片” 也可以 “ 直接封装在源代码，我自己替换就好”
7.忘记了还要把上一次的去除！！【上一次被抽到的】 7.忘记了还要把上一次的去除！！【上一次被抽到的】 7.忘记了还要把上一次的去除！！【上一次被抽到的】 7.忘记了还要把上一次的去除！！【上一次被抽到的】 7.忘记了还要把上一次的去除！！【上一次被抽到的】

明白你的意思了。
使用VB语言编写。
这里为了省事就直接封装吧！行吧？

添加如下控件：
PictureBox Name="Picdata"(0-9) '控件数组10个，用于存放指定的十张图，图片就自己添加！
PictureBox Name="PicMain"
CommandButton Name="CmdStart" Caption="开始"
Timer Name="Timer1 " Interval=600 '这里转动速度设置为600毫秒，你可以自行设定！

代码如下：
在CmdStart的Click事件中添加如下代码:
if Timer1.Endable=True Then
Timer1.Endable=False
CmdStart.caption="开始"
Else
Timer1.Endable=True
CmdStart.caption="停止"
End if

在Timer控件Timer事件中添加如下代码:
Dim rndX as integer
randomize
rndX = Int((10) * Rnd + 0)
PicMain.picture=picdata(rndX).picture

就这么多就行。如果需要通过对话框自定义图片就添加一个 ActiveX控件CommonDialog具体我就不赘述了，在网上有很多关于这个控件的用法！

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
清除上次结果，我这里就再添加一个CommandButton控件：
Name="CmdClear" Caption="清除结果"