VBA : s Switch -funktionen utvärderar uttryck och returnerar värden du förknippar med dessa uttryck . Detta beteende gör dina VBA -program för att fatta beslut , i form av " om-då " och liknande uttalanden . Till exempel kan du använda Switch för att returnera värden baserade på uttryck med ålder , till exempel namn på personer som matchar en viss ålder . Du kan sedan använda " om - då"-uttalande att dirigera programkörning att koda lämpliga för denna person . Första argumentet
Det första argumentet till Switch -funktionen är ett uttryck du vill VBA att utvärdera . Uttrycket kan utvärdera eventuell rörlig typ i VBA , inklusive heltal , strängar och andra typer . Switch kommer att testa uttrycket . Om det resulterar i " sant " Switch återkommer det värde du har länkat till detta uttryck . Ange detta värde som argument omedelbart efter argumentet innehåller uttrycket . Till exempel kanske du vill testa uttrycket " ålder = 40 , " och ha VBA returnera värdet " Clark " om ålder är lika med 40 . För att uppnå detta , skriv en switch-sats som " Switch ( ålder = 40 , " Clark " ) "
andra argumentet
Varannan argument i Switch uttalande avser det värde du vill Växla tillbaka om argumentet omedelbart föregår värdet utvärderas till true . Med andra ord, om " Lois " är det värde du vill Växla tillbaka om uttrycket " ålder = 35 " är sant , sedan skriva en switch uttalande så här : " Switch ( ålder = 35 , " Lois " ) " . Observera att du inte behöver använda strängar för det här värdet argument . VBA dokumentationen anger argumentet typ är " Variant ", vilket innebär att du kan göra heltal Switch avkastning , dubbel eller andra typer av värden .
Return Value
Switch avkastning värde tar på något av följande : ett värde från ett av argumenten du angav , eller " null " om inget av uttrycken du säger Switch för att utvärdera resultaten i ett värde på " Sant . " Till exempel , om variabeln " ålder " i följande uttalande är 40 eller 35 , kommer Switch returnera antingen " Clark " eller " Lois . " Om " ålder " är varken 40 eller 35 , kommer Switch returnera null .
Switch ( ålder = 40 , " Clark " , ålder = 35 , " Lois " ) Addera Sample Program
Du kan förstå switch lättare genom att köra ett kort program med detta uttalande . Följande program använder Switch med två par uttryck för att utvärdera och värderingar för att återvända . Observera att variabeln " v " har ingen specifik typ i sitt uttalande . Anledningen till detta är att understryka det faktum att Switch argument och returvärden kan ta på någon typ .
Sub Ages ( ) katalog
Dim v
Dim ålder As Integer
ålder = 40
v = Switch ( ålder = 40 , " Clark " , ålder = 35 , " Lois " ) katalog
Debug.Print v
End Sub Addera