Question

vba访问IFIX的全局变量的封装

如下代码，我想实现将其封装成DLL后，然后在IFIX里调用，从而对IFIX里的全局变量进行数据的修改，但是调用的时候发现总是找错：“找不到成员”
其DLL里的代码为：
Public Function TagRW(Str1 As String, Str2 As String, Str3 As String, Str4 As String, Str5 As String, Str6 As String) As String
Dim WorkspaceApp As Object
Set WorkspaceApp = GetObject("", "Workspace.Application")
Dim TargetVar As Object
Set TargetVar = WorkspaceApp.Documents("Str6").Page.FindObject("Str1")
TargetVar.CurrentValue = Str2
Set TargetVar = WorkspaceApp.Documents("Str6").Page.FindObject("Str3")
TargetVar.CurrentValue = Str4
Set TargetVar = WorkspaceApp.Documents("Str6").Page.FindObject("Str5")
TargetVar.CurrentValue = False
End Function

在IFIX脚本里的模块里的代码如下：
Sub TagRW()
Dim A As New RW
Dim Str1 As String
Dim Str2 As String
Dim Str3 As String
Dim Str4 As String
Dim Str5 As String
Dim Str6 As String
Dim Str As String
Str1 = OP1
Str2 = AKV56
Str3 = CODE1
Str4 = 8903
Str5 = Flag1
Str6 = user
Str = A.TagRW(Str1, Str2, Str3, Str4, Str5, Str6)
Set A = Nothing
End Sub
当运行的时候会指向Str6=user这一段，说找不到成员，
请问这是什么情况的呢？如果做能成功把访问全局变量的值封装到DLL里

Answer 1

34他vjktutuiikkiikyt

Answer 2

抱歉我不会，请多多包涵~