随机生成的10个两位数,求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和十位数(1~9),然后十位数乘10再加上个位数即得到一个两位数。 说明:在窗体上有一个Command1按钮,单击它将计算10个随机数的和以及平均数,并在窗体上输出平均数。 Private Sub Command1_Click() Dim M As Integer,N As Integer,Sum As Integer Dim I As Integer, K As Integer,Ave 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