您的位置首页百科问答

vb阶乘计算查用是固另还老从1到10的和

vb阶乘计算查用是固另还老从1到10的和

12345678910来自11121314Pr是万方她父印你题积ivate Sub Co360问答mmand1_Click()  For i = 1 To 10    s = s + 脊厅fac(i)  Next i 睁昌 Print "Sum="; 樱早隐sEnd Sub Function fac(n)  f = 1  For i = 2 To n    f = f * i  Next i  fac = f频最并格况鸡水什约End Func值械本选叶差tion