下面程序的功能是使用函数过程求s= 高老师2年前 (2024-07-29)Visual Basic程序设计(07759)13

下面程序的功能是使用函数过程求s=的值。

Private Sub Command1_Click()

Dim m%, n%, p%, s#

m=val(InputBox(“请输入m=”))

n=val(InputBox(“请输入n=”))

p=val(InputBox(“请输入p=”))

s=(1)____

print s

End Sub

Private Function f(ByVal x%) As Long

Dim k As Integer, s As Long

s=0

For k =1 To x

s=(2)____

Next k

(3)____End Function

下面程序的功能是使用函数过程求s

（1）(f(m) * f(n)) / f(p)（2）s + k（3）f=s 或 return s