[求助]expecting an existing scalar var什么意思?

Movicon VBA 脚本

Option Explicit
Sub Main()

Dim objTrend As TrendCmdTarget

'Set Trend Object
Set objTrend = GetSynopticObject().GetSubObject("Trend").GetObjectInterface


'Refresh Trend Area
objTrend.Requery
objTrend.Refresh

Set objTrend = Nothing
End Sub
执行时出现标题提示,光标停在Set objTrend =后 --------------------编程问答-------------------- GetSynopticObject括号去掉试试 --------------------编程问答-------------------- 先谢谢上面回复的朋友,去掉()也没用.

下面的代码是原来的,没错误,点击一个按钮刷新趋势图(Trend),本人对VB完全外行,但需要把这个Click触发改成OnChange触发,但就是不成功.希望内行的朋友看一下.谢谢!
=================
Option Explicit

Dim objTrend As TrendCmdTarget


Public Sub Click()
Set objTrend = GetSynopticObject.GetSubObject("Trend").GetObjectInterface
objTrend.Requery
objTrend.Refresh
Set objTrend = Nothing
End Sub
======================== --------------------编程问答-------------------- Not an object reference.

Set objTrend = GetSynopticObject.GetSubObject("Trend").GetObjectInterface
--------------------编程问答-------------------- 把上面的功能改为名为TEST的脚本,
SUB  Main



End sub的形式,如何该?

补充：VB ,  VBA