Private Function p1(x As Integer,y As Integer,z As Integer)
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/17 06:27:47
Private Function p1(x As Integer,y As Integer,z As Integer)
p1 = 2 * x + y + 3 * z
End Function
Private Function p2(x As Integer,y As Integer,z As Integer)
p2 = p1(z,y,x) + x
End Function
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As Integer
a = 2:b = 3:c = 4
Print p2(c,b,a)
End Sub
我算到后来就乱了.每步的结果~
p1 = 2 * x + y + 3 * z
End Function
Private Function p2(x As Integer,y As Integer,z As Integer)
p2 = p1(z,y,x) + x
End Function
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As Integer
a = 2:b = 3:c = 4
Print p2(c,b,a)
End Sub
我算到后来就乱了.每步的结果~
不就是个数学中的求函数值么,没啥好解释的
就比如
f(x,y,z)=2x+y+3z
g(x,y,z)=f(z,y,x)+x
求g(4,3,2)
就比如
f(x,y,z)=2x+y+3z
g(x,y,z)=f(z,y,x)+x
求g(4,3,2)
Private Function p1(x As Integer,y As Integer,z As Integer)
Function fun(a As Integer,n As Integer) As Integer
Dim a(9) As Integer,x As Integer,k As Integer,I As Integer R
麻烦解释这个程序Private Sub pl(x As Integer,ByVal y As Integer)x = 4
Private Sub Form_Click() Dim a As Integer,b As Integer,k As
Private Sub Command1_Click() Dim i As Integer,s As Integer,n
Dim ia(1 To 10) As Integer,imin As Integer,n As Integer,i As
vb程序Dim a(1 To 20) As Integer,i As Integer,j As Integer
Function hw(m As Long) As Boolean Dim a As Integer,b As Inte
英语翻译Private Sub 主体_Print(Cancel As Integer,PrintCount As Int
VB中的Dim sum As Integer语句
dim a(3,2) as integer