VB VB VB急急急急急急！！！！VB题 VB这是电脑软件

来源：百度知道 编辑：UC知道 时间：2024/06/30 16:32:42
(1^2+2^2.....m^2)/n等于什么？写出按钮一的程序 m和n在界面可输入
答案四舍五入。

四舍五入！！！！

Private Sub Command2_Click()
Dim s As Double
Dim m As Integer
Dim n As Integer
Dim a As Long, b As Long
Dim i As Integer

For i = 1 To m
a = i ^ 2
b = b + a
Next i

s = Round(b / n, 2) 'Round函数照指定的小数位数进行四舍五入运算,这里是2

End Sub

s就是四舍五入后的答案，上面的例子保留两位小数，可以根据要求更改s = Round(b / n, 2)中的2为指定小数位数。
至于m,n的界面输入你可以自己写。

上面的没错，主要是用了累加器和循环语句。