将程序界面转换为另一种语言界面VB.NET

Convert the program interface to another language interface VB.NET

将程序界面转换为另一种语言界面的代码有什么问题?在 Visual Basic .NET 中(Visual Studio 2019)

Imports System.Globalization
Imports System.ComponentModel

Public Class Form1
    Private Sub ArButton_Click(sender As Object, e As EventArgs) Handles ArButton.Click
        Languages.changelanguge("ar")
    End Sub
    Private Sub EnButton_Click(sender As Object, e As EventArgs) Handles EnButton.Click
        Languages.changelanguge("en")
    End Sub
End Class

Public Module Languages
    Public Sub changelanguge(ByVal languge As String)
        For Each obj As Control In Form1.Controls
            Dim lang As ComponentResourceManager = New ComponentResourceManager(GetType(Form1))
            lang.ApplyResources(obj, obj.Name, New CultureInfo(languge))
        Next
    End Sub
End Module

当您 运行 代码时发生了什么?我最近正在实施这个,下面的 link 帮了我很多。

https://docs.microsoft.com/en-us/dotnet/api/system.globalization.cultureinfo?view=netframework-4.8