主题：[分享] 获取窗口集合到目录树

如何做到提取控件级的列表呢？

這個???

Dim CTE As ControlTypeEnum      '控件枚举

' ADOXType                                '字段枚举

' AggregateEnum  '                      '统计类型枚举

' DateTimeFormatEnum                '日期枚举

'......

Dim  i As Integer

Dim s2  As String

For Each s1 As String In  [Enum].GetNames(CTE.Gettype)

    s2 = Format(Val([Enum].GetValues(CTE.Gettype)(i)),"[000]  ")  '枚举数字代码

    s2 = s2 & s1

    output.show(s2)

    i=i+1

Next