Вовзращает текущий путь в Дереве обьектов TDMS в виде массива обьектов.
Visual Basic |
---|
Public Function GetActiveTreePath() As Variant |
VB Script (Visual Basic) | ![]() |
---|---|
'Возвращает полный путь к выделенному элементу дерева, в виде массива. 'В том числе, сквозь выборку. Поддерживаются всё системные типы. '---------------------------------------------------- varArray = ThisApplication.Shell.GetActiveTreePath iCount = Ubound(varArray) For i = 0 To iCount Set Object = varArray(i) If Not Object Is Nothing Then MsgBox Object.Description End If next |