Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim address7 As New Uri("ftp://a.com/files/testfile.txt")
If address7.Scheme = Uri.UriSchemeFtp Then
Console.WriteLine("Uri is Ftp protocol")
End If
End Sub
End Class