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

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

我們所用到的VB.NET確定文件版本信息示例展示在下面代碼中，我將向窗體中添加一個列表框（List Box）控件。注意：必須在窗體或模塊的頂部添加下面的聲明才能運行本示例：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  

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