使用vb.net修改系统变量,还要在系统变量界面按确定才能生效

有如下ui和代码,每次运行程序后还需要去系统变量设置的地方按下确定才能生效

图片说明

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim variable_name As String = "UGII_LANG"
        Dim variable_value As String = "simpl_chinese"
        My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment", variable_name, variable_value)
        'My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Environment", variable_name, variable_value)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim variable_name As String = "UGII_LANG"
        Dim variable_value As String = "english"
        My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment", variable_name, variable_value)
    End Sub
End Class