Vba 带变量的VBScript脚本控制评估

这方面有问题，无法在网上找到更具体的解决方案

我有一个这样的表达

pictureFolderFullPath = "C:\Work"

'Create Script Control Obj
Dim sc As ScriptControl
Set sc = CreateObject("ScriptControl")
sc.Language = "VBScript"

Dim content As String
content = sc.Eval("pictureFolderFullPath & "\3.jpg"")

然后，内容变为仅“\3.jpg”，而不是图片的完整路径

使得脚本引擎可以使用运行时功能

语法

ScriptControl.AddObject(name, object[, addMembers])

AddObject方法包含以下部分：

零件说明

name    Required. Name by which the added object is to be known in ScriptControl code.
object  Required. Name of the object exposed at run time.
addMembers  Optional. Boolean value. True if members of object are globally accessible; False if they are not.

备注

---

使用AddObject方法使脚本引擎可以使用运行时功能。AddObject方法允许ScriptControl用户向脚本代码提供一组名称/对象对。脚本引擎可能以任何方式公开该名称。在VBScript和JScript中，每个名称都显示为全局可访问的名称。

必须将picturefolderpath添加到脚本的命名空间中<代码>sc.AddObject“frmSDI”，frmSDI，True正常。我尝试添加sc.AddObject行（“pictureFolderFullPath”，pictureFolderFullPath，True），但它说expected=您添加的是模块，而不是变量。那么我是否运行此sc.AddObject“frmSDI”，frmSDI，True？因为，它不起作用……它说变量没有为frmSDII postedthe docs定义。这是你模块的名字，不是我的。