建站
咨詢
售后
建站咨詢
新聞中心
VB.NET編程語言中的資源文件應(yīng)用方法有許多種，開發(fā)人員可以根據(jù)自己不同的需求來進(jìn)行選擇。我們在這里就為大家總結(jié)了幾種常見的VB.NET資源文件應(yīng)用技巧，希望能給大家?guī)硪恍椭?/p>
扶溝網(wǎng)站制作公司哪家好，找成都創(chuàng)新互聯(lián)公司！從網(wǎng)頁設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)等網(wǎng)站項(xiàng)目制作，到程序開發(fā)，運(yùn)營維護(hù)。成都創(chuàng)新互聯(lián)公司從2013年開始到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)公司。
一、VB.NET資源文件開發(fā)中英（簡、繁）雙版本
現(xiàn)在比較流行的軟件都會(huì)有中文版、英文版、繁體版等等多個(gè)版本，并可以根據(jù)系統(tǒng)的語言自動(dòng)顯示相適應(yīng)的版本，那么這個(gè)功能在 vb 是如何實(shí)現(xiàn)得呢的：
1、 首先通過 API 函數(shù)GetSystemDefaultLCID 判斷系統(tǒng)的語言
- Option Explicit
- Dim lang As String
- Private Declare Function
GetSystemDefaultLCID Lib
"kernel32" () As Long- Private Sub Form_Load()
- Dim LocaleID As Long
- LocaleID = GetSystemDefaultLCID
- Select Case LocaleID
- Case &H404
- MsgBox "當(dāng)前系統(tǒng)為：中文繁體", , "語言"
- Case &H804
- MsgBox "當(dāng)前系統(tǒng)為：中文簡體", , "語言"
- lang = "1"
- Case &H409
- MsgBox "當(dāng)前系統(tǒng)為：英文", , "語言"
- lang = "2"
- End Select
- End Sub
2、然后程序就可以加載保存在資源文件（這里我們就是使用的這種方法）、注冊表、INI 文件、文本文件或其他文件中的各類字符串，以達(dá)到達(dá)到實(shí)現(xiàn)多種語言的目的。
⑴啟動(dòng) vb6.0，在“外接程序→外接程序管理器”中加載“Visual Basic 6 資源編輯器”
⑵在 vb 資源編輯器窗口中，點(diǎn)擊“編輯字符串表格”輸入如下資料：
標(biāo)識(shí)號(hào) 中文（中國）
101 例子
102 中文
103 英文
201 Ensample
202 Chinese
203 English
⑶保存資源文件，寫如下代碼：（自定義裝載字符的函數(shù) LoadString）
- Sub LoadString()
- Me.Caption = LoadRes
String(Int(lang & "01"))- Command1(0).Caption =
LoadResString(Int(lang & "02"))- Command1(1).Caption =
LoadResString(Int(lang & "03"))- End Sub
⑷怎么樣一個(gè)簡單的中英雙版本的程序就做出來了，如果把 lang 的值設(shè)置為 1，則顯示中文，如果把 lang 的值設(shè)置為 2，則顯示英文。#t#
ps：更簡單實(shí)用的方法是:把不同語言文字放在同一個(gè)標(biāo)識(shí)號(hào)ID對應(yīng)的不同字符串表格中即可。vb 會(huì)自動(dòng)實(shí)現(xiàn)多種語言轉(zhuǎn)換!
二、 VB.NET資源文件直接播放EXE文件中的聲音文件
使用資源文件，可以直接在在EXE文件中播放聲音文件（WAV文件），使程序顯得更加專業(yè)。
⑴啟動(dòng) vb6.0，在“外接程序→外接程序管理器”中加載“Visual Basic 6 資源編輯器”
⑵在 vb 資源編輯器窗口中，點(diǎn)擊“添加自定義資料”，增加任意的 WAV 文件，再雙擊剛剛創(chuàng)建的自定義資源，彈出”編輯屬性”窗口，定義如下：
類型： "WAVE"
標(biāo)識(shí)號(hào)： 102
語言： 中文（中國）
⑶保存資源文件，寫如下代碼：
- Option Explicit
- Private Declare Function
GetSystemDefaultLCID Lib
"kernel32" () As Long- Private Declare Function
sndPlaySoundFromMemory Lib
"winmm.dll" Alias "sndPlaySoundA"
(lpszSoundName As Any, ByVal
uFlags As Long) As Long- Public Const SND_ASYNC = &H1&
- Public Const SND_MEMORY = &H4&
- Private Sub Command5_Click()
注釋：播放 WAV 文件- Dim bArr() As Byte
- bArr = LoadResData(102, "WAVE")
- sndPlaySoundFromMemory bArr(0),
SND_ASYNC Or SND_MEMORY- End Sub
⑷按 F5 運(yùn)行本程序，點(diǎn)擊 Command 按鈕，就可以聽到你選定的 WAV 文件的聲音了。
三、 VB.NET資源文件直接調(diào)用各類圖標(biāo)、光標(biāo)圖片
在一個(gè)程序中，我們可能需要調(diào)用多個(gè)圖標(biāo)、光標(biāo)、圖片文件，一般來說我們主要是使用 ImageList 控件，不過其時(shí)使用資源文件是最好的方法（可以少使用一個(gè)控件呀）。
⑴啟動(dòng) vb6.0，在“外接程序→外接程序管理器”中加載“Visual Basic 6 資源編輯器”
⑵在 vb 資源編輯器窗口中，點(diǎn)擊“添加光標(biāo)”，“添加圖標(biāo)”，“添加位圖”，裝載所需要的文件。
⑶程序代碼如下：
- Me.Icon = LoadResPicture
(101, vbResIcon) 注釋：加載圖標(biāo)- Picture1.Picture = LoadResPicture
(101, vbResBitmap) 注釋：加載位圖- Command1.MouseIcon = LoadResPicture
(101, vbResCursor) 注釋：加載光
文章名稱：VB.NET資源文件應(yīng)用經(jīng)驗(yàn)總結(jié)
當(dāng)前鏈接：http://m.5511xx.com/article/dpshjio.html
