小疑点

小问题
Dim   a(4)   As   Integer
Dim   t   As   Integer

a(0)   =   1
a(1)   =   5
a(2)   =   7
a(3)   =   10

Randomize

t   =   Int(3   +   1   *   Rnd)

Print   a(t)

我想     把   1   5   7   10装入数组   然后随即选出一个从数组随即选一个打印   为什么每次都打印10呢??

[解决办法]
Rnd 的返回值区间为 [0,1)，所以 Int(3 + 1 * Rnd) 始终为 3，应该是 Int(4 * Rnd)