模拟一场流星雨的例子，从中看看随机数的使用方法VB6.0源代码 运行是很是壮观!演示了随机数的产生和使用

VB演示随机数的用法，演示了随机数的生成，模拟一场流星雨，运行是很是壮观!演示了随机数的产生和使用，从中看看随机数的使用方法。请参见下面的代码片段： 　　VB6代码模拟一场流星雨的例子，从中看看随机数的使用方法： 　　Dim X(100), Y(100), pace(100), size(100) As Integer 　　Private Sub cmdQuit_Click() 　　Unload Me 　　End Sub 　　Private Sub Form_Activate() 　　Rand