Возвращает количество команд в наборе.

Применяется к:

ICommands

Синтаксис:

Visual Basic:

Property Count As Long

read-only

Описание:

Команды нумеруются с единицы. Метод Item возвращает объект для номеров с 1 по Count - 1, а для номера Count отдаёт Nothing.

Поэтому перебор набора пишется до Count - 1 включительно.

Пример:

Visual Basic:

Sub ICommands_Count
Set C = Zulu.Commands
'Перебираем весь набор: номера с 1 по Count - 1
n = 0
For i = 1 To C.Count - 1
  If Not (C.Item(i) Is Nothing) Then n = n + 1
Next
MsgBox "Count вернул " & C.Count & ", реально прочитано " & n
End Sub

Python:

import zulu

def Macro_ICommands_Count():
    C = zulu.App.Commands
    # Перебираем весь набор: номера с 1 по Count - 1
    n = sum(1 for i in range(1, C.Count) if C.Item(i) is not None)
    print("Count вернул", C.Count, ", реально прочитано", n)