下列程序为求Sn=a+aa+aaa+……+aa…a(n个a)，其中a为一个随机数产生

问题：

下列程序为求Sn=a+aa+aaa+……+aa…a(n个a)，其中a为一个随机数产生的1～9(包括1、 9)中的一个正整数，n是一个随机数产生的5～10(包括5、10)中的一个正整数，请在空格处填入适当的内容，将程序补充完整。
Private Sub Form_CUCk()
Dima As Integer,n As Intege,S As Double，Sn As Double
a=Fix(9*Rnd)+1
n=Pix(6*Rnd)+5
Sn=0
S=0
Fori=1 To [5]
S=S+a*10^(i-1)
[6]
PrintSn
Nexti
End Sub