我想生成一个8位的随机数，请问要怎么做？

Question

我这样做
Int((10000000*rnd))
可是结果不一定都是8位的，也可能是小于8位的，
我想得到固定8位的随机数要怎么做，谢谢。

Answer 1

Private Sub Form_Load()
Randomize
Debug.Print Format((100000000 * Rnd), "00000000")End Sub

Answer 2

我这样写出错的
Int((100000000*rnd),"00000000")
另外，我是在ASP环境下的。怎么办啊，谢谢。

Answer 3

Randomize
int a
a=Format((100000000 * Rnd), "00000000")

Answer 4

for i =1 to 8
a=a&i*rnd
next i

Answer 5

Dim i
Randomize
i=Int(10000000+89999999*Rnd)
Response.Write "i =" & i

Answer 6

Randomize
Dim a(7) As String
For i = 0 To 7
a(i) = Int(Rnd * 10)
Next
MsgBox Join(a, "")

Answer 7

Randomize
x=int(10000000+int10000000*rnd)或是
Randomize
x=format((10000000*rnd),"00000000")

Answer 8

int((上限-下限+1)*rnd+下限)
如:
Dim Lngnums as Long
Randomize
Lngnums=Int((99999999-10000000+1)*rnd+10000000)