如何獲得一個(gè)6位長(zhǎng)隨機(jī)數(shù)

根據(jù)MSDN給出的公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
6位長(zhǎng)隨機(jī)數(shù)=Int((999999-100000+1)*Rnd+100000)

或者，也可以這樣：分別生成0-9的5個(gè)數(shù)和一個(gè)1-9的數(shù)湊起來(lái)
6位長(zhǎng)隨機(jī)數(shù)=Int((9-1+1)*Rnd+1)*100000+ _
Int((9-0+1)*Rnd+0)*10000+ _
Int((9-0+1)*Rnd+0)*1000+ _
Int((9-0+1)*Rnd+0)*100+ _
Int((9-0+1)*Rnd+0)*10+ _
Int((9-0+1)*Rnd+0)

或者也可以先用"+"連成字符串再CInt

還有一個(gè)更簡(jiǎn)單的方法。六位長(zhǎng)的？也就是說(shuō)最小的是 100000 了是嗎？這樣：

Dim r As New Random()
Dim n As Integer = r.Next(100000, 999999)