
可以输入生成的开始,结束,精度,生成个数的,草草做了个.看看合你要求不,swf格式的,可以直接用.个人网盘中:
Function Random(Num)
dim TempNum
randomize
TempNum = (rnd*((10^Num-1)-10^Num/10))\1+10^Num/10
Random = TempNum
End Function
设置Num为100,就能连续生成100个左右的数
asp的

可以输入生成的开始,结束,精度,生成个数的,草草做了个.看看合你要求不,swf格式的,可以直接用.个人网盘中:
Function Random(Num)
dim TempNum
randomize
TempNum = (rnd*((10^Num-1)-10^Num/10))\1+10^Num/10
Random = TempNum
End Function
设置Num为100,就能连续生成100个左右的数
asp的