我的电脑--控制面板-系统-高级-环境变量-系统变量,请问如何在程序中往 系统变量 中添加值

解决方案 »

  1.   

    用这个函数
    SetEnvironmentVariable VB声明 
    Declare Function SetEnvironmentVariable Lib "kernel32" Alias "SetEnvironmentVariableA" (ByVal lpName As String, ByVal lpValue As String) As Long 
    说明 
    将一个环境变量设为指定的值 
    返回值 
    Long,TRUE(非零)表示成功,否则返回零。会设置GetLastError 
    参数表 
    参数 类型及说明 
    lpName String,欲设置的环境变量的名称。如具有这个名称的一个环境变量尚不存在,则函数会自动创建它 
    lpValue String,欲为变量设置的新值。如为NULL,表示清除一个现成值(用vbNullString常数向这个函数传递一个NULL) 
      

  2.   

    系统环境变量取数: environ() 函数取就是了