var aExt = pMe.Pm("/Trend").GetVarExtensions(); var n = aExt.GetSize(1); var i; for (i = 0; i < n; i++) { Pm.Debug(aExt.GetItem(i).TrendId); }
Dim aExt, n, i aExt = pMe.Pm("/Trend").GetVarExtensions() n = UBound(aExt) + 1 For i = 0 To n - 1 Pm.Debug aExt(i).TrendId Next