嗯，这是一个很大的领域。首先，阅读Walkthrough: Localizing Windows Forms。你会从中学到很多东西。有时您甚至可以在 Microsoft 网站上找到一些宝石。 ;-)
我使用三种策略来本地化应用程序。第一个是：
本地化表单
这很容易。
- 将 Localizable 属性设置为 True
- 请记住，您在表单上已有的文本是默认文本，当应用程序设置为您仍未为其创建文本的文化时，这些文本将应用。所以这通常是英语。
- 现在将表单的 Language 属性设置为您要翻译的语言/文化
- 现在将表单上的所有文本（标签、按钮、菜单项，一切！）更改为法语、德语、西班牙语或其他任何对应文本
- 现在保存表单并切换回默认语言。在那里你会找到你的旧（英文）文本
- 在表单所在的文件夹中，您将找到一个新的 *.resx 文件，该文件名为 YourForm.de-DE.resx 或 YourForm.fr-FR.resx，具体取决于您刚刚编辑的语言
- 根据为线程设置的文化，将显示适当的文本
本地化的 ComboBox 条目
有时您的 ComboBoxes 中的所有文本都必须本地化。然后我使用旧的数据库表方法。这看起来像：
ID Group ItemID en_US de_DE
1 Sexes 0 male männlich
2 Sexes 1 female weiblich
3 Sexes 2 diverse divers
4 FamilyStatus 0 single ledig
5 FamilyStatus 1 married verheiratet
6 FamilyStatus 2 divorced geschieden
7 FamilyStatus 3 widowed verwitwet
然后根据你想要的语言和你想要的组得到正确的 SELECT 语句。
其他的东西
其他的意思是例如消息框消息。那是只是暂时显示或不时更改的内容。
这里项目属性中的资源表是您的默认语言存储。要添加新语言，请执行以下操作：
- 在您的项目中创建一个名为“Resources”的文件夹
- 在此文件夹中添加一个新元素。选择资源文件。将其命名为 Resources.de-DE.resx 或 Resources.fr-FR.resx 以表示您想要创建的任何语言。
- 在此处和默认资源中添加内容
- 提示：String.Format 是您的朋友。创建带有占位符的文本，例如：“{0} of {1} 条记录”。请记住，其他语言可能需要在占位符“{0}”之前添加一些文本，因此您应该避免使用
Position & String.Format(" of {0} records", CounterText, DataTable.Rows.Count)。
现在，如何使用它：
在文化之间切换
为了测试本地化，我在我的测试表单中添加了一个 ComboBox（在您的选项对话框的发布中）并用这些项目填充它（在属性窗口中）：
（机器默认）
英文
德语
法语
盖尔语
那么相应的事件处理程序如下所示：
Imports System.Threading
Private Sub CboLanguage_SelectedIndexChanged(sender As Object, e As EventArgs) Handles CboLanguage.SelectedIndexChanged
If CboLanguage.SelectedItem Is Nothing Then Return
Dim Infos = {"", "en-US", "de-DE", "fr-FR", "gd-GB"}
If CboLanguage.SelectedIndex = 0 Then
Thread.CurrentThread.CurrentUICulture = CultureInfo.CurrentCulture
Else
Thread.CurrentThread.CurrentUICulture = New CultureInfo(Infos(CboLanguage.SelectedIndex))
End If
End Sub
该列表包含盖尔语仅用于测试我的资源中确实没有的语言，这意味着测试切换到默认资源。在生产中，您会从列表中删除您没有资源的语言，当然还有（机器默认）条目。
两种默认文化
请注意，启动应用程序时有两种默认文化。
我们有默认文化，它在我之前说过的项目属性中定义。但是还有另一种是运行应用程序的计算机语言。应用程序如何找到它将使用的文化有两种情况。
-
您启动应用程序，应用程序确定计算机文化并在您的资源中搜索相应的资源（每次需要资源时都会发生这种情况）。如果找到对应的资源，则使用该资源，否则将使用默认资源中的资源。
-
用户在选项中设置了另一种语言，它保存在任何设置策略（My.Settings、app.config、INI-File、注册表、独立存储、数据库）中，您在应用程序的初始化/启动时加载它并设置适当的线程 UICulture，然后这种文化将发生在计算机所在的位置。从现在开始，将在相应的资源文件中搜索资源，如果没有找到，则在默认资源中进行模拟。
获取文本
关于表单，您无需执行任何操作。根据您的Thread.CurrentThread.CurrentUICulture，将显示相应的文本。
一旦您将资源文本添加到默认资源或您的其他语言资源文件之一，VS 将在位于“我的项目”文件夹。
这意味着，如果您在默认资源或 Resources.en-US.resx 文件中创建名为“New”且值为“&New”的资源文本，则与 Resources.fr 中的值“&Nouveau”相同- FR.resx 文件和 Resources.de-DE.resx 文件中的“&Neu”，您可以通过以下方式访问文本：
My.Resources.New
就是这样。根据您的Thread.CurrentThread.CurrentUICulture，您将获得相应语言的文本。
程序集之间的转移
请注意，My.Resources 命名空间是用 Friend 修饰符声明的，这意味着它仅适用于本地程序集。每个程序集都有自己的My.Resources 命名空间。
如果您不使用多线程并且每个 DLL 在相同的文化中都有自己的本地化文本，那么您没有问题。但是，如果您想从主程序集中管理 DLL 中的文本，那么您需要在 DLL 中引用主 ResourceManager。这看起来像在您的 DLL 类中：
Public Class MyPublicDLLClass
' Members
Public Property ResourceManager As Resources.ResourceManager = Nothing
' Other members
End Class
在调用程序集中：
Dim DLLObject = New MyPublicDLLClass With {
.ResourceManager = My.Resources.ResourceManager
}
然后您可以这样做以访问调用程序集的资源：
Function GetText(Item As String) As String
Return GetText(Item, Nothing)
End Function
Function GetText(Item As String, [Default] As String) As String
Dim Def As String = If([Default], Item)
If ResourceManager IsNot Nothing Then
Dim Text = ResourceManager.GetString(Item)
Return If(String.IsNullOrEmpty(Text), Def, Text)
Else
Return Def
End If
End Function