Imports System
Public Class MainClass
Shared Sub Main()
'Declare variables
Dim strName1 As String, strName2 As String
'Get the names
strName1 = ""
strName2 = ""
'Are both names Sydney?
If strName1 = "Sydney" And strName2 = "Sydney" Then
System.Console.WriteLine("Both names are Sydney.")
Else
System.Console.WriteLine("One of the names is not Sydney.")
End If
End Sub
End Class
|