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