提示:
把变量s按照代码中的提示定义到指定位置去;
需要使用If语句判断Command1.Caption的值,来确定执行“计算”还是“显示”的代码
另外还有一些对你已经写了的代码的修改建议:
Dim n, s, i As Integer '如上所述,s要定义到别处去,那样也还剩下两个变量,
'建议分别定义类型,否则没有指定类型的变量(比如这里的n)会变成Variant型
n = InputBox(prompt, "请输入n的值:") '如果你希望提示信息显示在窗口标题而不是窗口中
'(现在这句代码就是这个效果),请把prompt改为空串"",不建议使用未定义的变量;
'如果你希望提示信息显示在窗口内部,请直接删掉prompt,这部分