Option ByVal
指定参数在过程声明中默认传递值
Option ByVal
Option ByVal是一个语句，将过程参数的默认传递约定设置为by value ，如同声明为ByVal一样。对于使用Option ByVal的模块的其余部分，此默认值仍然有效，并且可以通过在参数列表中指定ByRef来覆盖。
语法
Option ByVal
说明
Option ByVal是一个语句，将过程参数的默认传递约定设置为by value ，如同声明为ByVal一样。对于使用Option ByVal的模块的其余部分，此默认值仍然有效，并且可以通过在参数列表中指定ByRef来覆盖。
例子
''用“-lang fblite”编译开关编译
#lang "fblite"
Sub TestDefaultByref( a As Integer )
''改变价值
a = a * 2
End Sub
Option ByVal
Sub TestDefaultByval( a As Integer )
a = a * 2
End Sub
Dim a As Integer = 1
Print "a ="; a
TestDefaultByref( a )
Print "TestDefaultByref之后：a ="; a
Print
Print "a ="; a
TestDefaultByval( a )
Print "TestDefaultByval之后：a ="; a
Print
#lang "fblite"
Sub TestDefaultByref( a As Integer )
''改变价值
a = a * 2
End Sub
Option ByVal
Sub TestDefaultByval( a As Integer )
a = a * 2
End Sub
Dim a As Integer = 1
Print "a ="; a
TestDefaultByref( a )
Print "TestDefaultByref之后：a ="; a
Print "a ="; a
TestDefaultByval( a )
Print "TestDefaultByval之后：a ="; a
方言差异
- 仅适用于-lang fblite 和-lang qb 方言。
与QB差别
- 新的FreeBASIC
参考