Acessando Objetos com o Método Item

<< Clique para Mostrar o Sumário >>

 

Acessando Objetos com o Método Item

Toda coleção possui um método Item, que pode ser usado para acessar qualquer objeto dentro da coleção. Este método aceita um parâmetro Item, que pode ser um número inteiro positivo ou o nome do objeto dentro da coleção. O exemplo a seguir é um ajuste da cor da segunda Pena de um objeto E3Chart.

Sub CommandButton1_Click()
  ' Modifica a cor da segunda pena
  Screen.Item("E3Chart1").Pens.Item(2).Color = RGB(212, 208, 20)
End Sub

 

O mesmo ajuste pode ser obtido com o exemplo a seguir.

Sub CommandButton1_Click()
  ' Modifica a cor da pena com nome "Pena2"
  Screen.Item("E3Chart1").Pens.Item("Pena2").Color = RGB(212, 208, 20)
End Sub

 

Os comandos anteriores são equivalentes, o primeiro indicando o índice da Pena na coleção e o segundo indicando o nome da Pena.

Esta página foi útil?