问题描述：
[填空]
下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a，其中最后一项为n个。例如：a=5，n=4时，则Sn=5+55+555+5555。请在空白处填人适当的内容，将程序充完整。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的值："）[11] DoTn=Tn * 10 + aSn二Sn + TnCout=Cout+1 [12] Debug．Print a，n，SnEnd Sub
参考答案：查看无
答案解析：无
☆收藏
答案解析：无
☆收藏
上一篇：设有如下程序( ) Private Sub Form_Click（）A=1 For i＝1 To 3 Select Case i Case 1，3 A＝A+1 Case 2，4 A＝A+2 End Select Next i Print A End Sub 程序运行后，单击窗体，则在窗体上显示的内容是
下一篇：从E-R图向关系模式转换发生在数据库设计的（）阶段。
- 我要回答: 网友(3.145.38.67)
- 热门题目: 1.线程是一个（）级的实体，线程 2.7>6Imp7> 3.三种循环结构分别为：whil