📄 arguments_byreferencea.vb
字号:
'=========================================================================================='Name:Manish Kumar Sinha 'Email Address: manishkumarsinha@sify.com'Test Case Name: Argument passing by Reference:'APR-1.0.0: Argument Passing by Reference, which means the procedure can modify the variable' itself.'===========================================================================================Imports SystemModule APR_1_0_0 Function F(ByRef p As Integer) As Object p += 1 End Function Function Main() As Integer Dim a As Integer = 1 F(a) If (a = 1) Then System.Console.WriteLine("#A1, Unexcepted Behaviour in Arguments_ByReferenceA.vb") : Return 1 End If End FunctionEnd Module'============================================================================================
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -