VB.NET

Globalization

Please support our VB.NET advertiser: Intel Parallel Studio Home

Thread Solved

•

Join Date: Mar 2008

Posts: 324

Reputation: sonia sardana has a little shameless behaviour in the past

Solved Threads: 7

sonia sardana sonia sardana is offline

Offline

Posting Whiz

Globalization

Nov 11th, 2008

I have made two resource files,named

1)Form1.en-US.resx
Name Value
Button1.Text English

2)Form1.fr-FR.resx
Name Value
Button1.Text France

My Code is as Under-

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Imports System.Globalization
Imports System.Threading
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        lang = ComboBox1.SelectedItem
 
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language
    End Sub
End Class
Imports System.Globalization
Imports System.Threading

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        lang = ComboBox1.SelectedItem

        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language
    End Sub
End Class

But the Button1 text is not changing.Can Somebody tell where i m wrong?

•

Join Date: Mar 2008

Posts: 324

Reputation: sonia sardana has a little shameless behaviour in the past

Solved Threads: 7

sonia sardana sonia sardana is offline

Offline

Posting Whiz

Re: Globalization

Nov 11th, 2008

I have made two resource files,named Under the folder MyResources & mine project Name Language

1)myres.en-US.resx
Name Value
Button1.Text English

2)myres.fr-FR.resx
Name Value
Button1.Text France

My Code is as Under

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Imports System.Globalization
Imports System.Threading
Imports System.Resources
Imports System.IO
Imports System.Reflection
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        Dim rm As ResourceManager
        lang = ComboBox1.SelectedItem
 
        ' Thread.CurrentThread.CurrentCulture = New CultureInfo(lang) 'Changes the Language
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language
 
        rm = New ResourceManager("Language.MyLocalResources.myRes", Assembly.GetExecutingAssembly())
        Button1.Text = rm.GetString("Button1.Text")
 
    End Sub
End Class
Imports System.Globalization
Imports System.Threading
Imports System.Resources
Imports System.IO
Imports System.Reflection

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        Dim rm As ResourceManager
        lang = ComboBox1.SelectedItem

        ' Thread.CurrentThread.CurrentCulture = New CultureInfo(lang) 'Changes the Language
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language

        rm = New ResourceManager("Language.MyLocalResources.myRes", Assembly.GetExecutingAssembly())
        Button1.Text = rm.GetString("Button1.Text")

    End Sub
End Class

But the Button1 text is not changing.Insted Error is there--Could not find any resources appropriate for the specified culture or the neutral culture. Make sure "Lnaguage.MyLocalResources.myRes.resources" was correctly embedded .

Can Somebody help me!!!!!!!!!!!

•

Join Date: Jul 2008

Posts: 66

Reputation: Renukavani is an unknown quantity at this point

Solved Threads: 6

Renukavani Renukavani is offline

Offline

Junior Poster in Training

Re: Globalization

Nov 11th, 2008

•

Originally Posted by sonia sardana

I have made two resource files,named Under the folder MyResources & mine project Name Language

1)myres.en-US.resx
Name Value
Button1.Text English

2)myres.fr-FR.resx
Name Value
Button1.Text France

My Code is as Under
Help with Code Tags

VB.NET Syntax (Toggle Plain Text)
Imports System.Globalization
Imports System.Threading
Imports System.Resources
Imports System.IO
Imports System.Reflection
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        Dim rm As ResourceManager
        lang = ComboBox1.SelectedItem
 
        ' Thread.CurrentThread.CurrentCulture = New CultureInfo(lang) 'Changes the Language
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language
 
        rm = New ResourceManager("Language.MyLocalResources.myRes", Assembly.GetExecutingAssembly())
        Button1.Text = rm.GetString("Button1.Text")
 
    End Sub
End Class
Imports System.Globalization Imports System.Threading Imports System.Resources Imports System.IO Imports System.Reflection Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim ci As CultureInfo Dim aL As New ArrayList() For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures) ComboBox1.Items.Add(ci.Name) Next ci End Sub Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged Dim lang As String Dim rm As ResourceManager lang = ComboBox1.SelectedItem ' Thread.CurrentThread.CurrentCulture = New CultureInfo(lang) 'Changes the Language Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang) 'Changes the Language rm = New ResourceManager("Language.MyLocalResources.myRes", Assembly.GetExecutingAssembly()) Button1.Text = rm.GetString("Button1.Text") End Sub End Class
But the Button1 text is not changing.Insted Error is there--Could not find any resources appropriate for the specified culture or the neutral culture. Make sure "Lnaguage.MyLocalResources.myRes.resources" was correctly embedded .

Can Somebody help me!!!!!!!!!!!

hi
actualy u r adding mulilang files into project under resources folder. u need add bin/debug/resources/ here u have to create the textfile.not resouces file

•

Join Date: May 2007

Posts: 537

Reputation: choudhuryshouvi is an unknown quantity at this point

Solved Threads: 49

choudhuryshouvi choudhuryshouvi is offline

Offline

Posting Pro

Re: Globalization

Nov 11th, 2008

Check this tutorial

Shouvik_The_Expert_Coder
Have a problem? Don't worry just give me a call and I'll fix it for you.

•

Join Date: Mar 2008

Posts: 324

Reputation: sonia sardana has a little shameless behaviour in the past

Solved Threads: 7

sonia sardana sonia sardana is offline

Offline

Posting Whiz

Re: Globalization

Nov 11th, 2008

THX I Solved it....SOLUTION--

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Imports System.Globalization
Imports System.Threading
Imports System.Resources
Imports System.IO
Imports System.Reflection
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        Dim rm As ResourceManager
        lang = ComboBox1.SelectedItem
 
 
        'IIND
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang)
        rm = New ResourceManager("Lnaguage.Resource", Assembly.GetExecutingAssembly())
        Button1.Text = rm.GetString("Button1")
    End Sub
End Class
Imports System.Globalization
Imports System.Threading
Imports System.Resources
Imports System.IO
Imports System.Reflection

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ci As CultureInfo
        Dim aL As New ArrayList()
        For Each ci In CultureInfo.GetCultures(CultureTypes.SpecificCultures)
            ComboBox1.Items.Add(ci.Name)
        Next ci
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim lang As String
        Dim rm As ResourceManager
        lang = ComboBox1.SelectedItem


        'IIND
        Thread.CurrentThread.CurrentUICulture = New CultureInfo(lang)
        rm = New ResourceManager("Lnaguage.Resource", Assembly.GetExecutingAssembly())
        Button1.Text = rm.GetString("Button1")
    End Sub
End Class