【文件属性】:
文件名称:函数过程的调用-vb程序设计
文件大小:2.28MB
文件格式:PPT
更新时间:2021-04-24 12:48:26
vb,程序,设计
6.1.3函数过程的调用
调用形式:函数过程名([参数列表])
参数列表(称为实参或实元):必须与形参个数相同,位置与类型一一对应。可以是同类型的常量、变量、表达式。
Sub Form_Click
Dim x%, y%, z%
x = 124: y = 24
z = gcd(x, y)
MsgBox("最大公约数是" & z)
End Sub
程序运行流程
Function gcd( m%, n%) As Integer
If m < n Then t = m: m = n: n = t
Do while n<>0
r = m Mod n : m = n: n = r
Loop
gcd = m
End Function
Sub Form_Click
Dim x%, y%, z%
x = 124: y = 24
z = gcd(x, y)
Function gcd( m%, n%) As Integer
If m < n Then t = m: m = n: n = t
Do while n<>0
r = m Mod n : m = n: n = r
Loop
gcd = m
End Function
MsgBox("最大公约数是" & z)
End Sub
本章目录
调用演示