VB中产生10个不重复的随机数

           前几天听了米老师的课，才知道自己真的是学得都是似懂非懂 ,“一桶水不满，半桶水晃荡”这个比喻是最恰当不过了。

        米老师经常告诉我们说要脚踏实地地学习，那何为脚踏实地呢？我的理解是把你在哪一方面不懂的知识学会就是脚踏实地，就比如说用VB产生10个随机数，我们看着好像会了，但没有真正地去实现过；或者说我们已经实现了，但没有去总结，当真正要用到的时候，却摸不着头脑，不知如何去做。

        用VB编程语言来产生10个不重复的随机数，有两种方法：

      下面分别用VB编程来实现这一过程：

方法一及理解

Dim a(9) As Integer, i As Integer, j As Integer '定义数组及循环变量
Dim temp As Integer '定义一个临时变量存储生成的随机数
Dim flag As Integer '定义一个变量来给数组元素做标记
 
Private Sub Form