آموزش ساخت بخش ریسورس پیام های نرم افزار چند زبانه (ازین روش استفاده نکنید...)

در این آموزش ساخت Resource های بخش Message های نرم افزار MultiLanguage توضیح داده می شه...

که در این پروژه زبان های فارسی-عربی-انگلیسی و ویتنامی استفاده شده....

Windows Multi Language Application

Farsi

Arabic

English

Vietnamese

https://aparat.com/v/5kiHS

            Dim Id As String = My.Settings.LanguageId

            If Id.Length = 0 Then Id = My.Application.Culture.Name

            Debug.Print(Id)

            If My.Application.UICulture.Name <> Id Then

                My.Application.ChangeUICulture(Id)

                Debug.Print(Id)

            End If

-----------------------------------------------------------------------------------------------------------------------

Public Class CurrentResources

    Private Shared ManagerValue As New ComponentResourceManager(GetType(MultiLanguageResources))

    Public Shared ReadOnly Property Manager() As ComponentResourceManager

        Get

            Return ManagerValue

        End Get

    End Property

    Public Shared ReadOnly Property Strings(resName As String) As String

        Get

            Return Manager.GetString(resName)

        End Get

    End Property

    Public Shared ReadOnly Property ChangeLabguageMessage() As String

        Get

            Return Manager.GetString("ChangeLabguageMessage")

        End Get

    End Property

End Class

----------------------------------------------------------------------------------------------------------------------

    Private Sub ChangeLanguageToolStripMenuItem_DropDownItemClicked(sender As Object, e As ToolStripItemClickedEventArgs) Handles ChangeLanguageToolStripMenuItem.DropDownItemClicked

        Dim Result As MsgBoxResult = MsgBox(ChangeLabguageMessage, MsgBoxStyle.YesNo)

        If Result = MsgBoxResult.No Then Exit Sub

        My.Settings.LanguageId = e.ClickedItem.Tag.ToString

        My.Settings.Save()

        Application.Restart()

    End Sub

--------------------------------------------------------------------------------------------------------------------