[填空題] 下列程序計算Sn的值。Sn=a+aa+aaa+…+aaa…，其中最后一項為n個。 例如：a=5，n=4時，則Sn=5+55+555+5555。請在
2021-07-20
[填空題] 下列程序計算Sn的值。Sn=a+aa+aaa+…+aaa…，其中最后一項為n個。
例如：a=5，n=4時，則Sn=5+55+555+5555。請在空白處填入適當(dāng)?shù)膬?nèi)容，將程序補充完整。
Private Sub Command1_Click()
Dim a As Integer,n As Integer, Cout As Integer
Dim Sn As Long, Tn As Long
Cout=1
Sn=0
Tn=0
a=InputBox("請輸入a的值：")
(12)
Do
Tn=Tn*10+a
Sn=Sn+Tn
Cout=Cout+1
(13)
Debug.Print a，n，Sn
End Sub
正確答案：n=InputBox
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。