Imports System
Public Class Test
Public Shared Sub Main()
dim clCnt
clCnt = 1
clCnt = +1
clCnt = +1
Console.WriteLine(clCnt)
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlkaW0gY2xDbnQKCQkKCQljbENudCA9IDEKCQkKCQljbENudCA9ICsxCgkJY2xDbnQgPSArMQoJCQoJCUNvbnNvbGUuV3JpdGVMaW5lKGNsQ250KQoJRW5kIFN1YgpFbmQgQ2xhc3M=