VB.Net by API/System.IO/Path
Содержание
Path.AltDirectorySeparatorChar
<source lang="vbnet"> Imports System.IO Module Module1
Sub Main() Console.WriteLine("Alternate Directory Separator {0}", Path.AltDirectorySeparatorChar) End Sub
End Module
</source>
Path.DirectorySeparatorChar
<source lang="vbnet"> Imports System.IO Module Module1
Sub Main() Console.WriteLine("Directory Separator {0}", Path.DirectorySeparatorChar) End Sub
End Module
</source>
Path.GetDirectoryName
<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.GetExtension
<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.GetFileName
<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.GetFileNameWithoutExtension
<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.GetFullPath
<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.GetInvalidFileNameChars()
<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.GetInvalidFileNameChars() Console.Write(ch & " ") Next ch End Sub
End Class
</source>
Path.GetInvalidPathChars
<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>
Path.GetPathRoot
<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.VolumeSeparatorChar
<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>