Visual Basic for Applications er Microsofts skriptspråk for sin Office- pakke med programmer , som omfatter Access. En del av programmering med VBA innebærer å arbeide med virtuelle objekter , for eksempel databasen objekt som holder ditt arbeid lagets data . Hvert objekt har egenskaper som du kan lese og ofte satt til å administrere egenskapene til objektet . For eksempel kan du sjekke " Type" tilhører et felt objekt for å se om feltet er numerisk , alfabetisk eller annen type. Kontrollere en eiendom gir VBA -programmer med run- time informasjon de trenger for å administrere lagets data . Du trenger
Microsoft Access
Vis flere instruksjoner
en

Open Access , og deretter opprette en ny tabell kalt " table1 " med to kolonner : " Felt1 " og " felt2 . " Du skal skrive en VBA-programmet for å kontrollere egenskapene til en av disse kolonnene , og eiendommen av en avmerkingsboks kontroll.
2

Lag et skjema basert på " Tabell 1 " ved å klikke på "Form" -knappen på "Create "-menyen .
3

Høyreklikk det nye skjemaet er kategorien og velg " Design View", deretter klikker du på "boksen " kontroll på båndet ( den store verktøylinjen) . Dra i " Form Header" område for å lage boksen .
4

Høyreklikk på boksen og velg " Properties " og deretter type " justread " i "Navn "-feltet i " Annet" fanen på skjermen rett . Denne handlingen setter navnet på en avmerkingsboks som "verdi" egenskapen du vil sjekke inn VBA -kode.
5

Klikk på " ... " knappen på "Event " fanen " onclick "-feltet . . Dobbeltklikk på " Kode builder" å gå inn i VBA integrert utviklingsmiljø (IDE )
6

Lim inn følgende kode mellom "Private Sub " og " End Sub " uttalelser :
< p > Private Sub justread_Click ( )

With Me! Felt1
p Hvis Me! justread.value = True Deretter

. Aktiv = False

. Låst = sanne

Else

. Enabled = sant

. Låst = False

End If

End With

Avslutt Sub
p Dette subrutine sjekker " justread " kontrollen "value " eiendom for den "sanne " verdi. Hvis "verdi" er sant, deaktiverer subrutine brukeroppføring i " Felt1 " tekstboksen .
7

Trykk " Alt- F11 " for å returnere til Access , høyreklikk på skjemaets kategorien . Velg " Form View" å kjøre skjemaet .
8

type tekst i " Felt1 "-feltet , og deretter krysser av på toppen av skjemaet. Prøv å skrive mer tekst i " Felt1 "-feltet . VBA subrutine du oppga vil hindre oppføring, basert på verdien av boksen er " verdi " eiendom .
9

Høyreklikk på skjemaets tabellen og velg " Design "-visning. Tast inn IDE ved å klikke på " ... " . knappen i " justread " boksen er " onclick "-feltet , som du gjorde i trinn 5
10

Erstatt " justread_Click " subrutine med denne reviderte koden : en

Private Sub justread_Click ( )

With Me! felt2

If. BackColor = 16777215 Da

. BackColor = 13597561

Else

. BackColor = 16777215

End If

End With

End Sub
p Dette subrutine sjekker bakgrunnsfargen eiendom (kalt " BackColor ") av det andre feltet . Programmet endrer da at eiendommen dersom fargen er hvit .
11

Trykk "Alt -F8 " for å returnere til Access , deretter kjøre skjemaet bruker Trinn 7 instruksjoner.
12

Kontroller og fjern merkingen . Programmet du revideres vil endre bakgrunnsfargen på " felt2 . "