VB.Net Tutorial/Stream File/FileVersionInfo

Материал из VB Эксперт
Перейти к: навигация, поиск

Get FileVersionInfo

Imports System
Imports System.IO
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.ruponentModel

Public Class Tester
    Public Shared Sub Main
        Dim m_File As FileVersionInfo
        m_File = FileVersionInfo.GetVersionInfo("c:\\test.txt")
        Console.WriteLine(m_File.FileName)
        Console.WriteLine(m_File.FileName.Substring(m_File.FileName.LastIndexOf("\") + 1))
        Console.WriteLine(m_File.ruments)
        Console.WriteLine(m_File.rupanyName)
        Console.WriteLine(m_File.FileVersion)
        Console.WriteLine(m_File.ProductVersion)
        Console.WriteLine(m_File.ProductName)
        Console.WriteLine(m_File.FilePrivatePart)
        Console.WriteLine(m_File.FileDescription)
        Console.WriteLine(m_File.Language)
        Console.WriteLine(m_File.LegalTrademarks)
        Console.WriteLine(m_File.OriginalFilename)
        Console.WriteLine(m_File.SpecialBuild)
    End Sub
End Class
c:\\test.txt
test.txt
0