fork download

copy

Option Strict On
Imports System
 
Module Module1
	Sub Main()
		Dim valueOne As Integer = 10
		Dim valueTwo As Integer = 20
		Dim valueThree As Integer = 30
 
		Console.WriteLine ("Testing valueOne against valueTwo...")
		If valueOne > valueTwo Then
			Console.WriteLine("ValueOne: {0} larger than ValueTwo: {1}", valueOne, valueTwo)
		Console.WriteLine ("Testing ValueThree against ValueTwo...")
		If valueThree > valueTwo THEN
			Console.WriteLine("ValueThree: {0} larger than ValueTwo: {1}.", valueThree, valueTwo)
		End If
		Console.WriteLine("Testing is valueTwo > 15.")
		If valueTwo > 15 Then Console.WriteLine("Yes it is")
 
	End Sub
End Module

Visual Basic.Net Compiler version 0.0.0.5943 (Mono 3.8 - tarball)
Copyright (C) 2004-2010 Rolf Bjarne Kvinge. All rights reserved.

/home/UE9nLA/prog.vb (20,9) : error VBNC90019: Expected 'If'.
/home/UE9nLA/prog.vb (20,9) : error VBNC90019: Expected 'End'.
There were 2 errors and 0 warnings.
Compilation took 00:00:00.6019730

Standard output is empty