1.Wstęp
Napewno pracując z Windows spotkałeś z sytuacją, kiedy w trakcie używania programu musiałeś dodać lub wybrać coś z listy. Właśnie temu zagadnieniu poświęce ten rozdział, w którym omówię ListBox oraz ComboBox.
Na samym końcu zapoznam wszystkich z tablicami, przedstawię czym są, do czego można je wykorzystać.
2. ListBox
Zanim zaczniesz prace z listą, zapoznaj się z poniższą tabelą.
Właściwość
Opis
BackColor
Kolor tła
Columns
Określa ilość kolumn 0-jedna kolumna, 1 i wiecej- liczba kolumn w ilości określonej
ForeColor
Kolor tekstu w polu listy
Height
Wysokość kolumny
List
Zawiera listę, do której możesz wprowadzać elementy listy wyboru
Sorted
Określa, czy elementy mają być sortowane
Style
Określa czy lista ma wyglądać tradycyjnie, czy ma zawierać pola wyboru
Żeby móc korzystać z list, będziesz musiał poznać również cztery podstawowe metody, które odpowiadają za listy.
AddItem - Dodaje element do listy
Clear - Usuwa wszystkie elementy z listy
List - Podaje w postaci łańcucha zawartość listy
ListCount - Podaje ilość elementów listy
RemoveItem - Usuwa pojedyńczy element listy
Pierwszą i chyba najważniejszą metodą jest AddItem, która odpowiada za dodawanie pozycji do naszej listy. W celu dodania należy wykonać następujące czynności:
Dodaj do formularza ListBox (domyślna nazwa to List1 i niech tak zostanie)
Następnie w oknie kodu pomiędzy Private Sub Form_Load() a End Sub wpisz linijkę List1.AddItem "nazwa" co przyczyni się do tego, że na liście pojawi się pozycja "nazwa".
Można tą operacje przeprowadzić również na zmiennych.
Deklarujemy zmienną "dane" typu String.
Dim dane As String
dane = "nazwa"
List1.AddItem dane
Zwróć uwagę, że zmienna nie jest umieszczona pomiędzy nawiasami.
Każdy element na liście ma swój index. Tak więc każda pozycja zaczyna się od 0. W celu usunięcia z listy słowa "nazwa" należy użyć instrukcji:
List1.RemoveItem(0)
Jeżeli chcesz usunąć więcej niż jedną instrukcje możesz użyć kilka instrukcji przedstawionych powyżej z różnymi index-ami lub skorzystać z instrukcji, która czyści całą liste:
List1.Clear
Dzięki listą możesz w łatwy sposób mieć dostęp do tych danych. Pamiętaj, że zmienne odczytujące dane z listy muszą być Stringami lub Variantami. I tak, jeżeli chcesz użyć wartości "nazwa" musisz przypisać ją do zmiennej np. dane:
Dim dane As String
dane = List1.List(0)
Żeby wyświetlić ilość elementów listy np. w polu tekstowym użyj instrukcji:
ilosc = List1.ListCount
Pamiętaj, że zmienna ilość musi być typu Integer lub Currency.
Wspomnę jeszcze, że w właściwościach listy jest pole MultiSelect, które można ustawić na Simple lub Extended. Simple - daje możliwość wyboru kilku pozycji z listy, natomiast Extended tylko jednej.
3. ComboBox
Generalnie listy typu Combo działają prawie tak jak ListBox-y. Cechą odróżniającą listę Combo jest możliwość dodawania kolejnych pozycji w trakcie pracy programu. Listy Combo korzystają z tych samych metod co wcześniej poznana lista, tak więc nie musisz uczyć się nowych.
Są trzy rodzaje list typu Combo:
Opuszczana lista Combo- znajduje się w pojedyńczej linijce, można wpisać lub wybrać wartości z listy
Prosta lista- wyświetla dane, tak jak poprzednia poznana (ListBox). Można dodać nowe elementy
Opuszczana lista wyboru- daje możliwość jedynie wyboru danego elementu
W zależności którą chcesz zastosować, musisz ustawić odpowiednią wartość w właściwościach ComboBox (style).
Podstawowe właściwości listy Combo są takie same jak dla ListBox.
Jeżeli chcesz wprowadzić jakąś wartość do listy Combo, zrób to tak:
wstaw liste Combo1
dla przycisku Command1 dodJ procedure: Combo1.AddItem Combo1.Text. Przycisk będzie dodawał do listy wartość wpisaną w polu Combo.
Tablice
Tablice mówiąc najprościej są listą zmiennych o tej samej nazwie. Dotychczas każdą deklarowaną zmienną nazywałeś inaczej. Używając tablic będziesz mógł je przypisać do jednej nazwy.
Załóżmy, że mamy program, który sumuje 5 liczb i daje wynik. Korzystając z tablic możemy to zrobić w następujący sposób.
Dim liczba(4) As Currency, wynik As Currency.
Pamiętaj, że 0 też jest wartością, dlatego dla 5 zmiennych należy w indeksie wstawić 4 (0,1,2,3,4) daje w sumie 5 licz.
Teraz, żeby otrzymać wynik musimy wszystko dodać:
wynik = liczba(0) + liczba(1) + liczba(2) + liczba(3) + liczba(4)
Można też znacznie skrócić zapis używając pętli. Ma to duże znaczenie w przypadku, gdy zmiennych jest nie 5 a np. 50.
wynik=0
For index=0 To 4
wynik = wynik + liczba(index)
Next index
I to byłby koniec, pamiętaj, że tablice można również przyporządkować do elementów sterujących.
Autor: Paweł Pietrasz
Wyszukiwarka
Podobne podstrony:
K4 L9AiRA L9l9Day 1 L9 Inflammatory lesionsALL L90610?lass101l9chap2 l9L9V L9 0409?lass101L9 newL9L72 L9 schemwięcej podobnych podstron