怎么用VB做随即数在0-9之间

Rnd*9 (取不到0和9)
顺便问一下，你是不是想问随即整数啊，如果求0－9的随机整数应该是Int(Rnd*10) (取到0和9)

最好加一个随机种子randomize() 开奖嘛 这个不能少的 呵呵 算是给楼上的补充 另外楼上的写法不对 不过没有关系

Dim a As Integer

Private Sub Command1_Click()
Randomize
a = 9 * Rnd
Print a
End Sub

添加一个按纽

int(rnd*10+1)

Private Sub Command1_Click()
Dim a As Integer
Randomize
a = Int(Rnd*10)
Print a
End Sub

学习输入验证码这号已经被封`````