作业帮 > 综合 > 作业

使用for循环实现 s=11+22+33+44……使用inputbox输入需要计算次数用msgbox显示计算结果

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/06/02 20:39:49
使用for循环实现 s=11+22+33+44……使用inputbox输入需要计算次数用msgbox显示计算结果
Dim ret As Long
ipt = InputBox("请输入次数","输入")
ret = 0
For i = 1 To ipt
ret = ret + i * 10 + i
Next
msg = MsgBox("结果:" & ret,vbOKOnly,"输出")
不知道你数组的规律到底是不是+11我就瞎写的(按+11做的).