module1.bas

来自「一个可以重命名workspace的程序」· BAS 代码 · 共 17 行

Attribute VB_Name = "Module1"


Function test_ByRef(ByRef BR)
BR = BR + 10
test_ByRef = (BR)
End Function


Function test_ByVal(ByVal BV As Integer)

BV = BV + 10
test_ByVal = (BV)

End Function