本人菜鸟...
如何输出0~9中的任意3个数~~

看不懂什么意思
0~9
随你输入啊

Option Explicit

Private Sub Command1_Click()
Dim Result As Integer
Randomize (Now()) 'Randomize()函数用于初始化随机数函数Rnd()，这里用Now()产生当前时间来作为参数来进行初始化
Result = Rnd() * 9 'Rnd()函数用来产生0-1之间的随机数，乘个9变成0-9的随机数。
Print Result
End Sub

一般来说Randomize就够了。

下面Rnd函数的介绍最好这样说：Rnd 函数返回一个小于 1 但大于或等于 0 的值。

要产生指定范围的随机整数，请使用以下公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。

楼上的正解！又学会新东西了～