随机生成的10个两位数，求出它们的总和与平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和十位数(1～9)，然后十位数乘10再加上个位数即得到一个两位数。

说明：在窗体上有一个Commandl按钮，单击它将计算10个随机数的和与平均数，

并在窗体上输出平均数。

Private Sub Commandl Click()

Dim m As Integer, n As Integer, sum As Integer

Dim i As Integer, k As Integer, aver As Single

sum=0

Randomize

For i＝1 To 10

m＝Int(9*RnD)+1

n=【 】

k=m*10+n

sum=【 】

Next i

aver=【 】

Print aver

End Sub