VB:如何为计算机的环境变量，增加一个系统变量，并赋值

发布时间：2020-12-16 22:53:27 所属栏目：大数据来源：网络整理

导读：Private Sub Form_Load() Dim sysenv As Object Set sysenv = CreateObject ( " WScript.Shell " ).Environment( " system " ) MsgBox sysenv( " vbtest " ) sysenv( " vbtest " ) = " test ok " MsgBox sysenv( " vbtest " ) End Sub

Private Sub Form_Load()
Dim sysenv As Object
Set sysenv = CreateObject("WScript.Shell").Environment("system")
MsgBox sysenv("vbtest")
sysenv("vbtest") = "test ok"
MsgBox sysenv("vbtest")
End Sub

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!