Count

<< Clique para Mostrar o Sumário >>

 

Count

Número Retorna o número de objetos filhos, ou itens, que um objeto possui. Esta propriedade funciona em conjunto com o método Item. Se o objeto não possuir filhos, o valor retornado é 0 (zero). Esta propriedade é somente de leitura. O script a seguir contém um exemplo de uso desta propriedade.

Sub Tela1_Click()
  ' Busca todos os objetos de tela
  ' e ajusta a propriedade
  ' ForegroundColor para vermelho
  Dim obj
  For i = 1 To Count
    Set obj = Item(i) ' Objeto filho
    obj.ForegroundColor = RGB(255, 0, 0)
  Next
End Sub

Esta página foi útil?