一道VB题目,求详解
发布网友
发布时间：2022-05-10 15:23
共1个回答
热心网友
时间：2023-10-13 11:50
Dim k As Integer, m As Integer, p As Integer
k = 4: m = 1
p = pc(k, m): Print p; '调用下面的pc函数并输出p的值
p = pc(k, m): Print p '再次重复上面的操作
End Sub
Function pc(a As Integer, b As Integer)
Static m As Integer, i As Integer '虽然定义 m 和 i 是静态变量，但是
m = 0: i = 2 '这里给它们重新赋了值，所以每次输出的结果都是两个 8 ，如果把此句注释了，则每次的结果都不一样
i = i + m + 1
m = i + a + b
pc = m 'm 的值作为此函数的返回值传给上面的变量 p
End Function
