填空题

以下程序用于求S=1+3+3²+3³+…+3¹⁰的值。
Private Sub Commandl_Click()
S=1
T=1
ForI=1 To 10
T=______
S=S+T
NextI
Print"S="；S
End Sub

【参考答案】

T*3

<上一题目录下一题>

热门试题

填空题

在C盘当前文件夹下建立一个名为StuData.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。 Pfivate Sub Form_Click() Open C:StuData.txt ForOut PUt As#1 Fori=l To5 StuNo=InputBox( 请输入学号 ) StuName=InputBox( 请输入姓名 ) StuEng=Val(1nputBox(“请输入英语成绩”)) ______ Nexti Close#1 End Sub

填空题

Lisn.Addnem I

相关试题