在VB.NET中檢索文件信息

您是否曾經(jīng)希望了解如何檢索要在您自己的應(yīng)用程序中使用的特定文件的屬性？如果您要在 VB NET 中開發(fā)的應(yīng)用程序依賴于特定的環(huán)境 那么在執(zhí)行程序中的代碼之前 您需要檢查文件的屬性 例如 您可能需要了解特定文件隨之發(fā)行的產(chǎn)品 或者是文件的版本號 在 VB NET 中 借助 GetVersionInfo 方法和 FileVersionInfo 類 要獲得這些信息簡直易如反掌 　如果啟動 Windows 資源管理器 右擊一個文件名 然后從彈出式菜單中選擇 屬性 則會看到該文件的 屬性 窗口 屬性 窗口顯示了選定文件的有關(guān)信息 假設(shè)您在任務(wù)管理器的 TASKMAN EXE 文件名上右擊 圖 顯示了該文件的 屬性 對話框 　

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：國際域名空間、雅安服務(wù)器托管、營銷軟件、網(wǎng)站建設(shè)、東寧網(wǎng)站維護、網(wǎng)站推廣。

)this style width= ;

通過使用 FileVersionInfo 類 您可以在 VB NET 應(yīng)用程序中提供相同的功能 根據(jù)應(yīng)用程序的需要 您可以復(fù)制 屬性 對話框中顯示的全部信息 也可以復(fù)制其中的一部分 圖 顯示了我們將要創(chuàng)建的應(yīng)用程序 它將用來復(fù)制 屬性 對話框中顯示的部分信息

image javascript:return big(this) src= //img educity cn/img_ / / / jpg javascript:if(this width )this style width= ;

要創(chuàng)建演示程序 請啟動 VB NET 并開始一個名為 Retrieving File Properties（檢索文件屬性）的新項目 按照圖 所示 向 Form 添加七個文本框控件 七個標簽控件和一個按鈕控件 接下來 將以下代碼添加到 Get Properties（獲取屬性）按鈕的 Click 事件

borderColorDark=#ffffff cellPadding= width= align=center borderColorLight=black border= e e

Private Sub Button _Click(ByVal sender _As System Object ByVal e As System EventArgs) _Handles Button Click 獲取記事本的文件版本Dim FileProperties As FileVersionInfo = FileVersionInfo GetVersionInfo( C:\WINNT\taskman exe ) 檢索文件說明（名稱）TextBox Text = FileProperties FileDescription 檢索文件版本TextBox Text = FileProperties FileVersion 檢索文件的內(nèi)部名稱TextBox Text = FileProperties InternalName 檢索文件的舊名稱TextBox Text = FileProperties OriginalFilename 檢索產(chǎn)品名稱TextBox Text = FileProperties ProductName 檢索產(chǎn)品版本TextBox Text = FileProperties ProductVersion 檢索語言TextBox Text = FileProperties LanguageEnd Sub

現(xiàn)在 按 F 鍵執(zhí)行該應(yīng)用程序 當您單擊 Get Properties（獲取屬性）按鈕時 程序?qū)@示 TASKMAN EXE 文件的有關(guān)信息 如圖 中所示

Get Properties（獲取屬性）按鈕的 Click 事件代碼調(diào)用 GetVersionInfo 方法 該方法返回一個 FileVersionInfo 類 其中包括您所指定的文件的所有版本信息 您需要向 GetVersionInfo 方法提供一個完全限定的文件 如果沒有指定正確的路徑名 則該方法僅返回文件名本身 而不返回文件信息 調(diào)用 GetVersionInfo 后 就像我們在演示程序中所做的一樣 只需通過類就可以檢索特定的屬性 　FileVersionInfo 類包含很多屬性 您可以通過查詢這些屬性來檢索文件信息 表 僅顯示了我們在演示程序中查詢的屬性 但是可以在 MSDN 中通過搜索 FileVersionInfo 類說明找到完整的列表 　表 FileVersionInfo 類可以使用的屬性　

cellSpacing= cellPadding= width= border= %

屬性

%

說明

%

FileDescription

%

檢索指定文件的說明

%

FileVersion

%

檢索指定文件的版本號

%

InternalName

%

檢索指定文件的內(nèi)部名稱 （并不是所有的文件都關(guān)聯(lián)有內(nèi)部名稱 ）

%

OriginalFilename

%

檢索指定文件在首次創(chuàng)建時最初被賦予的名稱

%

ProductName

%

檢索指定文件的產(chǎn)品名稱 它是此文件隨之發(fā)行的產(chǎn)品的名稱 （并不是所有的文件都關(guān)聯(lián)有產(chǎn)品名稱 ）

%

ProductVersion

%

檢索指定文件的產(chǎn)品版本 它是 ProductName 屬性的版本

%

Language

%

檢索指定文件的版本資源中的 Microsoft 語言標識符（顯示為字符串）

lishixinzhi/Article/program/net/201311/12277

VB.NET實現(xiàn)sql查詢問題

實在看不下去了，

Const sql As String = "select * from 學生基本信息表 where 學號='" textbox1.Text "'"

Const searchsql As String = "insert into 學生基本信息表 values('"

Dim xh As String , name As String , sex As String , id As String , tel As String , address As String

Dim time As DateTime

Dim conn as new adodb.connection

dim ConnectionString as string

If textbox1.Text = "" Or textbox2.Text = "" Then

MsgBox "該生信息不完整"

Else

ConnectionString = "Data Source=ZX\SQLEXPRESS;Initial Catalog=studentMIS;Integrated Security=True"

conn.Open(ConnectionString)

cmd.CommandText = sql

cmd.Connection = conn

sqlda.SelectCommand = cmd

Try

dr = cmd.ExecuteReader()

Do While dr.Read()

MsgBox("該生信息已存在")

Loop

If dr.Read = False Then

xh = textbox1.Text

name = textbox2.Text

sex = cb1.SelectedItem

time = textbox3.Text

id = textbox4.Text

tel = textbox5.Text

address = textbox6.Text

searchsql = searchsql xh "','" name "','" sex "','" time "','" id "','" tel "','" address "')"

cmd.CommandText = searchsql

sqlda.SelectCommand = cmd

sqlda.Fill(ds, "學生基本信息表")

End If

Catch ex As Exception

MsgBox(ex.Message)

End Try

End If

按F8一句句調(diào)試看那句不對

vb.net 中如何使用SQL語句查詢數(shù)據(jù)庫

dim

myselectquery

as

string

=

"select

*

from

表1

where

姓名='小強'"

dim

mycommand

as

new

sqlcommand

(myselectquery,

conn)

'建立一個command控件，conn是你的sqlconnection對象

conn.open()'打開數(shù)據(jù)連接

dim

myreader

as

sqldatareader'定義一個reader用來讀數(shù)據(jù)

myreader

=

mycommand.executereader()'運行你的查詢，結(jié)果到myreader

if

myreader.read()

then

'如果查到了數(shù)據(jù)

msgbox(myreader.getstring(0))

'顯示第一個字段

end

if

vb.net數(shù)據(jù)庫查詢

select * from 表 where

(case when 條件 then 1 else 0 end+

case when 條件 then 1 else 0 end+

case when 條件 then 1 else 0 end+

case when 條件 then 1 else 0 end+

case when 條件 then 1 else 0 end) BETWEEN 2 and 5

如何在vb,net 窗體中實現(xiàn)查詢功能

N=length(R);

scatter(C(:,1),C(:,2));

hold on

plot([C(R(1),1),C(R(N),1)],[C(R(1),2),C(R(N),2)])

hold on

for ii=2:N

plot([C(R(ii-1),1),C(R(ii),1)],[C(R(ii-1),2),C(R(ii),2)])

hold on

end

vb.net 中如何使用SQL語句查詢數(shù)據(jù)庫中的數(shù)據(jù)

1、首先打開Visual Studio 2008代碼窗口，添加引用。

2、輸入以下代碼：Public conn1 ?As SqlConnection = New SqlConnection 。

3、聲明關(guān)鍵字 Public；（因為是全局變量，所以用Public 來聲明）。

4、如果SQL 數(shù)據(jù)庫就在本機，則用以下代碼連接。

5、如果代碼太長，影響可讀性，可以用空格加"_"后，回車換行即可。