VB.NET是由微軟推出的一款針對(duì)面向?qū)ο蟮木幊陶Z(yǔ)言。它可以向開(kāi)發(fā)人員打造一個(gè)安全穩(wěn)定的開(kāi)發(fā)環(huán)境。而且在移動(dòng)設(shè)備的處理方面展現(xiàn)了極大的操作優(yōu)勢(shì)。我們今天就可以通過(guò)VB.NET確定文件版本信息這一示例來(lái)體現(xiàn)其功能的強(qiáng)大。#t#

在Visual Basic 6中，可以調(diào)用API函數(shù)實(shí)現(xiàn)VB.NET確定文件版本信息。而VB.NET中，允許使用屬性和方法確定文件版本的詳細(xì)信息，從而簡(jiǎn)化這一過(guò)程。為了獲得這些信息，我將向您展示如何使用FileVersionInfo類，如何調(diào)用其GetVersionInfo方法，此方法以文件名做為參數(shù)。

我們所用到的VB.NET確定文件版本信息示例展示在下面代碼中，我將向窗體中添加一個(gè)列表框（List Box）控件。注意：必須在窗體或模塊的頂部添加下面的聲明才能運(yùn)行本示例：Imports System.Diagnostics.FileVersionInfo。

Private Sub GetFileVersionInfo()  
Sub GetFileVersionInfo()   
Dim sFileName As String = 
("C:\Program Files\Yahoo!
\Messenger\YahooMessenger.exe")   
Dim Info As FileVersionInfo 
Info = FileVersionInfo.
GetVersionInfo(sFileName)   
With Info ListBox1.Items.
Add("File Name: " & .FileName)  
ListBox1.Items.Add
("Company Name: " & .CompanyName)  
ListBox1.Items.Add("File 
Description: " & .FileDescription)   
ListBox1.Items.Add("File 
Version: " & .FileVersion)  
ListBox1.Items.Add("File 
Language: " & .Language)  
ListBox1.Items.Add("File 
Product Name: " & .ProductName)  
ListBox1.Items.Add("File Product 
Version: "& .ProductVersion)   
End With   
End Sub  

為了實(shí)現(xiàn)VB.NET確定文件版本信息這一操作，定義了變量sFileName，它用于保存文件的位置。同時(shí)也定義了FileVersionInfo類的變量為Info，然后向列表框中，一個(gè)一個(gè)地添加從FileVersionInfo對(duì)象中挑選出來(lái)的屬性。