Imports System
Public Class Test
Function FindMax(ByVal num1 As Integer, ByVal num2 As Integer) As Integer
' local variable declaration */
Dim result As Integer
If (num1 > num2) Then
result = num1
Else
result = num2
End If
FindMax = result
End Function
Public Shared Sub Main()
Console.WriteLine(FindMax(1, 3))
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CgkKCUZ1bmN0aW9uIEZpbmRNYXgoQnlWYWwgbnVtMSBBcyBJbnRlZ2VyLCBCeVZhbCBudW0yIEFzIEludGVnZXIpIEFzIEludGVnZXIKCSAgICcgbG9jYWwgdmFyaWFibGUgZGVjbGFyYXRpb24gKi8KCSAgIERpbSByZXN1bHQgQXMgSW50ZWdlcgoJICAgSWYgKG51bTEgPiBudW0yKSBUaGVuCgkgICAgICAgcmVzdWx0ID0gbnVtMQoJICAgRWxzZQoJICAgICAgIHJlc3VsdCA9IG51bTIKCSAgIEVuZCBJZgoJICAgRmluZE1heCA9IHJlc3VsdAoJRW5kIEZ1bmN0aW9uCgkKCVB1YmxpYyBTaGFyZWQgU3ViIE1haW4oKQoJCUNvbnNvbGUuV3JpdGVMaW5lKEZpbmRNYXgoMSwgMykpCglFbmQgU3ViCgkKCQoKRW5kIENsYXNz