Vzťahuje sa na
|
Objekt ListBox |
Vlastnosť MultiSelect môžete použiť na určenie toho, či používateľ môže vykonať viacero výberov v stĺpcový zoznam na formulár a ako je možné vykonať viacero výberov. Bajt na čítanie a zapisovanie.
výraz.ViacnásobnýVýber
Výraz Povinný argument. Výraz, ktorý vráti jeden z objektov v zozname Vzťahuje sa na.
Poznámky
Vlastnosť ViacnásobnýVýber používa tieto nastavenia.
|
Nastavenie |
Visual Basic |
Popis |
|
Žiadne |
0 |
(Predvolené) Nie je povolené vykonať viacero výberov. |
|
Jednoduché |
1 |
Viacero položiek sa vyberie alebo ich výber sa zruší kliknutím myšou na ne alebo stlačením klávesu MEDZERNÍK. |
|
Rozšírené |
2 |
Viacero položiek sa vyberie podržaním klávesu SHIFT a kliknutím na ne myšou alebo podržaním klávesu SHIFT a stlačením klávesu so šípkou, pokiaľ chcete rozšíriť výber z predtým vybranej položky na aktuálnu položku. Môžete tiež vybrať položky tak, že ich presuniete myšou. Podržaním klávesu CTRL a kliknutím na nejakú položku sa daná položka vyberie alebo sa jej výber zruší. |
Poznámka: Vlastnosť ViacnásobnýVýber môžete nastaviť tak, že použijete hárok vlastností zoznamu, makro alebo kód Visual Basic for Applications (VBA).
Túto vlastnosť možno nastaviť iba v návrhovom zobrazení formulára.
Na vrátenie indexu pre vybratú položku môžete použiť vlastnosť IndexZoznamu. Keď je vlastnosť ViacnásobnýVýber nastavená na hodnotu Rozšírené alebo Jednoduché, môžete na určenie vybratých položiek použiť vlastnosť zoznamu Selected alebo kolekciu ItemsSelected. Okrem toho ak je vlastnosť ViacnásobnýVýber nastavená na Rozšírené alebo Jednoduché, bude hodnota ovládacieho prvku zoznamu vždy Null.
Ak je vlastnosť ViacnásobnýVýber nastavená na hodnotu Rozšírené, vyžiadanie si zoznamu vymaže všetky výbery vykonané používateľom.
Príklad
Ak chcete vrátiť hodnotu vlastnosti ViacnásobnýVýber pre zoznam s názvom Krajina vo formulári Objednávky, môžete použiť toto:
Dim b As Byte
b = Forms("Order Entry").Controls("Country").MultiSelect
Ak chcete nastaviť vlastnosť ViacnásobnýVýber, môžete použiť toto:
Forms("Order Entry").Controls("Country").MultiSelect = 2 ' Extended.
