急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!已知C的公式表示如下:' ' C=------------------' (n-m)!*m!'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,'请修正程序中错误.'----------
来源:学生作业帮助网 编辑:作业帮 时间:2024/08/15 23:30:36
![急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!已知C的公式表示如下:' ' C=------------------' (n-m)!*m!'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,'请修正程序中错误.'----------](/uploads/image/z/5905986-42-6.jpg?t=%E6%80%A5%E6%B1%82VB%E7%A8%8B%E5%BA%8F%E6%94%B9%E9%94%99%E9%A2%98%E9%AB%98%E6%89%8B%2C%E6%AF%8F%E4%B8%AAFOUND%E4%B8%8B%E4%B8%80%E8%A1%8C%E6%9C%89%E9%94%99%E8%AF%AF%2C%E8%AF%B7%E6%94%B9%E6%AD%A3%21%E5%8D%81%E4%B8%87%E7%81%AB%E6%80%A5%21%E5%B7%B2%E7%9F%A5C%E7%9A%84%E5%85%AC%E5%BC%8F%E8%A1%A8%E7%A4%BA%E5%A6%82%E4%B8%8B%3A%27+%27+C%3D------------------%27+%28n-m%29%21%2Am%21%27%E5%87%BD%E6%95%B0%E8%BF%87%E7%A8%8Bfac%28+%29%E6%B1%82k%21%E5%87%BD%E6%95%B0%2C%E5%9C%A8Fomr_Click%E4%BA%8B%E4%BB%B6%E4%B8%AD%E5%AE%8C%E6%88%90%E8%BF%90%E7%AE%97%2C%27%E8%AF%B7%E4%BF%AE%E6%AD%A3%E7%A8%8B%E5%BA%8F%E4%B8%AD%E9%94%99%E8%AF%AF.%27----------)
急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!已知C的公式表示如下:' ' C=------------------' (n-m)!*m!'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,'请修正程序中错误.'----------
急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!
已知C的公式表示如下:
'
' C=------------------
' (n-m)!*m!
'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,
'请修正程序中错误.
'------------------------------------------------
Option Explicit
Private Function fac(k As Integer) As Single
Dim x As Single,j As Integer
'
C = fac(n) / fac(n - m) * fac(m)
Print "C="; C
End Sub
急求VB程序改错题高手,每个FOUND下一行有错误,请改正!十万火急!已知C的公式表示如下:' ' C=------------------' (n-m)!*m!'函数过程fac( )求k!函数,在Fomr_Click事件中完成运算,'请修正程序中错误.'----------
1、x = 0 (不管怎么乘都是0,0乘任何数都为0) 应该为 x=1
2、 x = x ^ j (表示x的j次方) 应该为 x = x *j
3、C = fac(n) / fac(n - m) * fac(m) (乘除的优先级别一样 按照次序进行,即先除再乘)
应该为 C = fac(n) /( fac(n - m) * fac(m))