PoprzedniaWyżejGłównaSpis treściIndex hasełZnajdźBokGora
BokGora

Google
 

Właściwość ItemData

Właściwość ItemData ustawia lub zwraca wartość dla każdego elementu kontrolek ComboBox i ListBox.

Składnia właściwości ItemData:

obiekt.ItemData(Indeks) [= Wartość]

Składnia właściwości ItemData składa się z części:
obiekt obiekt który wykorzystuje właściwość ItemData, dostępny na liście
Indeks Numer określający element w obiekcie
wartość Numer skojarzony z odpowiednim elementem

Właściwość ItemData jest tablicą typu Long o takich samych numerach elementów jak właściwość List. Można używać numery skojarzone z każdym elementem do identyfikowania ich. Np. można użyć numerów identyfikacyjnych pracowników umieszczonych na liście kontrolki ListBox. Przy wypełnianiu kontrolki ListBox należy wypełnić również odpowiedni element tablicy ItemData z numerami pracowników.
Właściwość ItemData jest często wykorzystywana jako indeks tablicy struktury danych skojarzonej z elementami kontrolki ListBox.

Podczas wstawiania elementów do kontrolki przy użyciu metody AddItem, element jest automatycznie dodawany do tablicy ItemData. Jednak jego wartość jest ustawiana na 0. Przy używaniu właściwości ItemData należy się upewnić, że wartość ta jest ustawiana dla każdego dodawanego elementu.

Przykład użycia właściwości ItemData:

Jeżeli w programie zadeklarowana zostanie tablica varTablica to można dodać jej elementy do listy List1 a indeksy tablicy do ItemData:

Dim varI
For varI = LBound(varTablica) To UBound(varTablica)
  'pęlta dodająca wszystkie elementy tablicy do listy
   List1.AddItem varTablica(varI)
     'dodaje element do listy
  List1.ItemData(List1.NewIndex) = varI
     'dodaj indeks elementu z tablicy varTablica do ItemData
Next varI

Jeżeli lista List1 ma właściwość Sorted ustawioną na True, to indeks elementu listy będzie inny niż indeks tego elementu w tablicy varTablica. Można wtedy uzyskać indeks wybranego elementu w tablicy przez użycie właściwości ItemData. Np:

varTekst = MsgBox (List1.List(List1.ListIndex))
   'wyświetla wybrany element listy List1
varTekst = MsgBox (List1.ItemData(List1.ListIndex))
   'wyświetla indeks tego elementu w tablicy varTablica

Zmienne, deklaracje zmiennych, rozkaz For, funkcje LBound, UBound i MsgBox, metoda AddItem, właściwości NewIndex, List i ListIndex zostałe opisane w innych częściach kursu.

Lista obiektów wykorzystujących właściwość ItemData:
ComboBox
ListBox






Google
 
Poprzednia | Wyżej | Strona główna | Spis Treści | Index haseł | Opis VB

BokDol
PoprzedniaWyżejGłównaSpis treściIndex hasełZnajdźBokGora
BokGora