Arbejde med operatorer

Deklarering af variabler giver dig et sted at gemme værdier. Operatorer er måden, hvorpå du kombinerer, sammenligner og tester disse værdier — hvilket i bund og grund er, hvordan du udtrykker en forretningsregel i kode. "Er lageret under genbestillingsniveau?" er en sammenligningsoperator. "Genbestil hvis lageret er lavt OG produktet er Elektronik" er en logisk operator.

Aritmetiske operatorer

De fleste af disse fungerer præcis som forventet fra en lommeregner, men VBA har to divisionsoperatorer, der gør noget reelt forskelligt:

Dim total As Double
total = 45 * 3      ' multiplication → 135
total = 100 / 3     ' division → 33.33...
total = 100 \ 3     ' integer division → 33 (drops remainder)
total = 100 Mod 3   ' remainder only → 1
total = 2 ^ 3       ' exponent → 8

Backslash (\) og Mod er de to, der ofte forvirrer, fordi de ligner hinanden, men besvarer modsatte spørgsmål. 100 \ 3 besvarer "hvor mange hele gange går 3 op i 100?" — svaret er 33, og det, der er tilbage, ignoreres. 100 Mod 3 besvarer det modsatte spørgsmål, "hvad er tilbage, efter at 3 er gået op i 100 så mange hele gange som muligt?" — svaret er 1. Tilsammen giver 33 grupper af 3 plus en rest på 1 tilsammen 100 — det er ikke en tilfældighed, det er præcis, hvad de to operatorer er designet til at opdele. Dette par bruges typisk til at beregne "hvor mange hele kasser med 3 kan jeg pakke, og hvor mange enheder er der tilbage til en delvis kasse?" eller til at tjekke, om et rækkenummer er lige (i Mod 2 = 0).

Sammenligningsoperatorer

Disse returnerer True eller False:

44 > 30      ' True
44 = 44      ' True
"Office" = "office"   ' False — VBA's default string comparison IS case-sensitive
44 <> 30     ' True (not equal)

Logiske operatorer

Disse kombinerer to eller flere sammenligninger til et enkelt sandt/falsk-resultat — præcis hvordan en forretningsregel med flere betingelser udtrykkes:

If category = "Electronics" And stock < 30 Then
    ' triggers only if BOTH are true
End If
 
If category = "Office" Or category = "Electronics" Then
    ' triggers if EITHER is true
End If
 
If Not (stock < reorderLevel) Then
    ' triggers if stock is NOT below reorder level
End If

And kræver, at alle betingelser, der forbindes med den, er True, før hele udtrykket er True — det første eksempel udløses kun for elektronikprodukter, der også reelt har lavt lager, ikke for alle produkter med lavt lager uanset kategori. Or kræver kun, at én betingelse er True, hvilket bruges til at tjekke medlemskab i et lille sæt af acceptable værdier. Not vender blot et True/False-resultat til det modsatte — det bruges ofte, som i det tredje eksempel, til at udtrykke en regel som "IKKE den dårlige tilstand", når det læses mere naturligt end at omskrive den gode tilstand direkte.

Sammenkædning af tekststrenge

Sammenføjer tekst med & (ikke +, som VBA reserverer til tal):

Dim message As String
message = "Product: " & productName & " | Stock: " & currentStock
' Product: Wireless Mouse | Stock: 134

Bemærk, at currentStock er et tal (134), ikke tekst, men det sammenkædes i strengen uden nogen konvertering — VBA konverterer automatisk et tal til dets tekstrepræsentation, når du bruger & på det. Denne bekvemmelighed er præcis grunden til, at & foretrækkes frem for + til at sammenføje tekst: hvis du skrev "Stock: " + currentStock, ville VBA forsøge at tolke hele udtrykket som aritmetik og enten give en fejl eller et forvirrende resultat, afhængigt af konteksten. & betyder altid "sammenføj som tekst" uden tvetydighed.

Opgave

1. Brug Monitor Arm's data (Price 89.99, Stock 18, Reorder Level 10), og skriv et udtryk, der tjekker, om lageret er mindre end eller lig med genbestillingsniveau plus 10 — en "nærmer sig"-advarsel i stedet for en hård alarm.
2. Byg en sammenkædet besked: "Monitor Arm er på 18 enheder (genbestilling ved 10)" ved hjælp af variabler, ikke hårdkodet tekst.