Manipulere listeverdiene elementer i en Microsoft Access database applikasjon ikke er så komplisert prosess som en skulle tro . I Access kan du bruke Visual Basic for Applications - eller VBA - for å hjelpe deg å automatisere prosesser som å flytte elementer fra en valgliste til en annen. Den " AddItem " metoden brukes til å legge til nye elementer til en liste kontroll. Den " ListCount " eiendom bestemmer antall rader i en liste , og " RemoveItem " metoden fjerner et element fra listen over verdier som vises i en liste . Instruksjoner
en
Klikk på " Create "-kategorien , og klikk " Form Design. " Klikk på " List Box " på Kontroller- panelet , og klikk på skjemaet for å legge en ny liste boks kontroll. Opprette en ny liste og en knapp ved hjelp av samme teknikk.
2
Høyreklikk den første listen , klikk "Properties " og klikke på "Data "-fanen . Velg "Value List " ved siden Row Kilde Type. Gjør det samme for den andre listen .
3
Høyreklikk skjemaet, klikk på "Egenskaper " og velg " Form " under "Valg Type. " Klikk på "Event "-fanen og velg " [ Hendelsesprosedyre ] " ved siden av On Load. Klikk ellipseknappen å lage skjema belastning arrangementet
4
Kopier og lim inn følgende kode for å legge til fire elementer i listeboksen kontroll: .
Me.List1.AddItem ( "element 1 ")
Me.List1.AddItem ( " element 2 ")
Me.List1.AddItem ( " punkt 3 ")
Me.List1.AddItem ( " element 4 ")
5
Høyreklikk kommandoen knappen, klikk " Bygg hendelse »og velger " kode Builder "for å lage en knapp klikkhendelsen .
6
Copy og lim inn følgende kode for å flytte alle elementer fra den første listen til den andre listen når knappen klikkes : en
Dim xCntr As Integer
Me.List4.SetFocus
< p> For xCntr = 0 For å Me.List1.ListCount - en
Me.List4.AddItem ( Me.List1.ItemData ( xCntr ) )
Neste xCntr
xCntr = 0 For å Me.List1.ListCount - en
Me.List1.RemoveItem ( 0 )
Neste xCntr
7
Switch tilbake til Microsoft Access database vinduet, og klikk på "View "-ikonet på Visninger-ruten . Klikk på kommando for å flytte elementene fra den første valglisten til den andre.
