如何更改Windows语言? [英] How can I change Windows Language?

问题描述

在我的vb.net软件默认情况下，如何使用Windows语言?

我是学生，我正在自己的项目中工作，我在项目中使用的是拖曳语言，一种是英语，第二种是乌尔都语，这是亚洲语言.
当我加载vb.net表单时，默认情况下语言为英语，并且我发送了语言ID urdu，因此我想在项目启动时使用第二种语言.
而且我也想从项目中选择一个拖曳语言的组合框，所以我想选择其中一个，然后我从组合框选择的Windows语言就会发生变化.
我认为有使用注册表项，因为我在vb.net中有一个正在运行的项目，并且关闭了Windows代码的防火墙，这给了波纹管

How can I use my windows language by default of my vb.net software?

I am student and I am working on a project my own project it is I use there is tow language in my project one is English and second is Urdu which is Asian language .
When my vb.net form load so by default language is English and I have send language id urdu so I want to use my second language when my project start.
And I also want to any one if select from my project there is a combo box where is tow language so I want to select one of them and then my windows language change as I selected from a combobox.
I think there is use registry key as I have a project in vb.net which is working of one and off of fire wall of windows code is give bellow

Imports System
Imports Microsoft.Win32
Public Class Form1
    Private regkey As RegistryKey
    Private ret_v As Byte

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        regkey = Registry.LocalMachine.OpenSubKey("SYSTEM\currentControlSet\Services\SharedAccess\Parameters\FirewaLLpolicy\Standardprofile", False)
        ret_v = regkey.GetValue("EnableFirewall")
        If ret_v = 1 Then
            RadioButton1.Checked = True
        Else
            RadioButton2.Checked = True
        End If
        regkey.Flush()
        regkey.Close()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        regkey = Registry.LocalMachine.OpenSubKey("SYSTEM\currentControlSet\Services\SharedAccess\Parameters\FirewaLLpolicy\Standardprofile", True)
        regkey.SetValue("EnableFirewall", ret_v, RegistryValueKind.DWord)


        regkey.Flush()
        regkey.Close()
        MsgBox("SUCCESSFULL APPLIED", MsgBoxStyle.Information, Me.Text)

    End Sub

    Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
        If RadioButton1.Checked = True Then
            ret_v = 1
        End If
    End Sub

    Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
        If RadioButton2.Checked = True Then
            ret_v = 0
        End If
    End Sub
End Class

请按我的要求告诉我任何有关我的项目的信息，或者我想使用它请告诉我

[edit]不要大喊大叫！所有大写字母都被认为是在互联网上大喊大叫，无礼.添加了代码块-OriginalGriff [/edit]

Please tell me any one about my project as I asked or I want to use please tell me

[edit]DON''T SHOUT! All uppercase is considered shouting on the internet, and rude. Code block added - OriginalGriff[/edit]

推荐答案

我在这里回答了您的问题:

如何使用Windows我的vb.net软件默认使用哪种语言? [ ^ ]如果您认为答案不适用或不理解答案，请在此处添加注释.不要转发.

I answered your question here:

How can I use my windows language by default of my vb.net software? [^] if you don''t think the answer in applicable or you understand the answer, put a comment there. Don''t repost.

这篇关于如何更改Windows语言?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！