VB中资源文件的多种使用技巧

一、开发中英文(简体、繁体)版本
现在流行的软件都会有中文版、英文版、繁体版等。，并且可以根据系统的语言自动显示合适的版本。那么这个功能在VB中是如何实现的:
1。首先通过API函数GetSystemDefaultLCID
Option Explicit
Dimlang As String
Private Declare函数GetSystemDefaultLCID Lib " kernel 32 "()As Long
Private Sub Form _ Load()
Dim LocaleID As Long
LocaleID = GetSystemDefaultLCID
Select Case LocaleID
Case & H404
MsgBox "当前系统然后，程序可以加载存储在资源文件(我们这里用的就是这种方法)、注册表、INI文件、文本文件或者其他文件中的各种字符串，从而达到实现多语言的目的。
⑴启动VB6.0，在外接程序→外接程序管理器中加载Visual Basic 6资源编辑器
⑴在VB资源编辑器窗口中，单击“编辑字符串表”按钮，选择合适的资源。BR > ID号中文(中国)
101示例
102中文
103英文[/BR/]201 en示例
202中文
203英文
⑶保存资源文件，编写以下代码:(函数loadstring用于自定义加载字符)[/BR/]subloadstring()[/BR/]me . caption = loadressstring(int(lang & " 01))[/BR/]commcaption = loadress string(int(lang & " 02 ")
command 1(1)。caption = loadresstring(int(lang & " 03 ")
end sub
φ如何制作一个简单的中英文版本的程序，如果你把
ps:一个更简单实用的方法是把不同的语言和字符放在同一个ID号对应的不同字符串表中，VB会自动实现多语言转换！

二、直接播放EXE文件中的声音文件
利用资源文件，可以直接播放EXE文件中的声音文件(WAV文件)，使程序更加专业。
⑴启动VB6.0，在外接程序→外接程序管理器中加载Visual Basic 6资源编辑器
⑴在VB资源编辑器窗口中，单击“添加自定义材质”添加任意WAV文件，然后双击新创建的自定义资源，弹出“编辑属性”窗口。定义如下:
Type: "WAVE"
ID号:102
语言:中文(中国)
⑶保存资源文件，编写以下代码:
option explicit
Private Declare Function getsystemdefaultlcidlib " kernel 32 "()As Long
Private Declare Function sndplaysoundfrommermember Lib " winmm . dll "别名" sndPlaySoundA "(lpssoundname As Any，ByVal uFlags As Long)