VB.Net/File Directory/Path
Содержание
Get Invalid Path Chars
<source lang="vbnet"> Imports System Imports System.IO Imports System.Windows.Forms Public Class MainClass
Shared Sub Main() For Each ch As Char In Path.GetInvalidPathChars() Console.Write(ch & " ") Next ch End Sub
End Class
</source>
Get Path or File information: extenstion, full path, path root
<source lang="vbnet"> Imports System.IO Module Module1
Sub Main() Dim P As String = "\" Try Console.WriteLine("Starting path: {0}", P) Console.WriteLine("Directory name: {0}", Path.GetDirectoryName(P)) Console.WriteLine("Extension: {0}", Path.GetExtension(P)) Console.WriteLine("Filename: {0}", Path.GetFileName(P)) Console.WriteLine("Filename without extension: {0}", Path.GetFileNameWithoutExtension(P)) Console.WriteLine("Full path: {0}", Path.GetFullPath(P)) Console.WriteLine("Root: {0}", Path.GetPathRoot(P)) Catch E As Exception Console.WriteLine("Error: {0}", E.Message) End Try Console.WriteLine() End Sub
End Module
</source>
Path Alternate Directory Separator
<source lang="vbnet"> Imports System.IO Module Module1
Sub Main() Console.WriteLine("Alternate Directory Separator {0}", Path.AltDirectorySeparatorChar) End Sub
End Module
</source>
Path Separator and Volume Separator Char
<source lang="vbnet"> Imports System.IO Module Module1
Sub Main() Console.WriteLine("Path Separator {0}", Path.PathSeparator) Console.WriteLine("Volume Separator {0}", Path.VolumeSeparatorChar) End Sub
End Module
</source>