VB一道作业题，程序的，急~~~

来源：百度知道 编辑：UC知道 时间：2024/04/29 22:20:29
建立含有4个命令按钮的控件数组，要求如下

100
1,单击第一个命令按钮计算 ∑i;
i=1

2,单击第二个命令按钮计算10!;

10
3,单击第三个命令按钮计算 ∑7i （是7的i次方,我不知道怎么打=.=）
i=1

结果付给Resule变量
====================================================================
希望高手给出完整的程序..
最好有简单的说明..
实在是弄不明白啊..
我是初学者

private sub command1(index as integer)
select case index
case 1
'第一题要求的是：1+2+3+....+100
Static resule as integer
resule=0
for i=1 to 100
resule=resule+i
next i
print str(resule)
case 2
'第二题：10的阶乘
Static resule as long
resule=1
for i=1 to 110
resule=resule*i
next i
print str(resule)
case 3
'第三题求的是7+7^2+7^3+.....+7^10
Static resule as long
resule=0
for i=1 to 10
resule=resule+7^i
next i
print str(resule)
End select
End sub

这些都是最基本的循环了，你看一下就明白的。

for i= 1 to 100 step
1 sum=sum+i
2 sum=sum*i
3 sum=sum+7^i

next i