Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim address8 As New Uri("https://example.yourDomain.com")
If address8.Scheme = Uri.UriSchemeHttps Then
Console.WriteLine("Uri is Https protocol.")
End If
End Sub
End Class