Visual Basic for Applications is Microsoft's scripttaal voor zijn Office- suite van programma's, die Access bevat . Een deel van het programmeren met VBA houdt in het werken met virtuele objecten , zoals de database- object dat de gegevens van uw werk team houdt . Elk object heeft eigenschappen die je kunt lezen en vaak ingesteld op de kenmerken van het object te beheren . Bijvoorbeeld , kunt u de " Type" eigenschap van een Field-object controleren om te zien of het veld numeriek , alfabetisch of een ander type . Controleren van een accommodatie biedt VBA -programma's met de run -time informatie die ze nodig hebben om de gegevens van uw team te beheren . Wat je nodig hebt
Microsoft Access
Toon Meer Aanwijzingen
1 Open Access , maak een nieuwe tabel met de naam " Tabel1 " met twee kolommen : " Veld1 " en " veld2 . " Je hebt een VBA programma te schrijven om de eigenschappen van een van deze kolommen , en de eigenschap van een checkbox controle controleren . Kopen van 2 Maak een formulier op basis van " Tabel1 " door te klikken op de "Form " knop op het menu ' Start ' .
3 klik met de rechtermuisknop op de tab nieuwe formulier en selecteer "Design View ', klik vervolgens op de " checkbox " controle op het lint ( de grote toolbar ) . Sleep in de "Form Header " gebied om het selectievakje te creëren .
4 Rechtsklik op het selectievakje en selecteer "Eigenschappen ", typ dan " justread " op het gebied van de " Andere " " Name " tab op het scherm rechts . Deze actie zet de naam van een checkbox waarvan de "waarde" eigenschap die u in VBA-code zal kijken .
5 Klik op de " ... " knop op het veld " Bij klikken " van het tabblad "Event " . . Dubbelklik op " Code builder " om de VBA geïntegreerde ontwikkelomgeving ( IDE ) voer
6 Plak de volgende code tussen de " Private Sub " en " End Sub " uitspraken :
Private Sub justread_Click ( ) op met me! Veld1
Als Me! justread.value = True dan
. Enabled = False
. Locked = True
Else
. Enabled = True
. Locked = False End
Als End met
end Sub
Deze subroutine controleert de " justread " controle van de "waarde" eigenschap voor de " True " waarde . Als "waarde" is waar , de subroutine schakelt de user entry in de " veld1 " tekstvak .
Press 7 " Alt - F11 " om terug te keren naar Access , klik met de rechtermuisknop op de tab van het formulier . Selecteer "Form View " om het formulier te voeren .
Type 8 alle tekst in het veld " veld1 " , controleer dan het vakje aan de bovenkant van het formulier . Proberen om meer tekst te typen in het veld " Veld1 " . De VBA subroutine die u hebt ingevoerd wordt voorkomen binnenkomst, gebaseerd op de waarde van de " waarde " eigenschap van de checkbox 's .
Rechtsklik op tafel van het formulier en selecteer "Design " view 9 . Opnieuw invoeren van de IDE door te klikken op de " ... " . toets in het veld " OnClick " de " justread " checkbox 's , zoals je deed in stap 5
10 Vervang de " justread_Click " subroutine met deze herziene code : Private Sub justread_Click
( ) op With Me Field2
Als . BackColor = 16777215 dan
. BackColor = 13597561
Else
. BackColor ! = 16777215 End
Als End
Met End Sub
Deze subroutine controleert de achtergrondkleur pand ( genaamd " BackColor " ) van het tweede veld . Het programma verandert dan is dat zaken als de kleur is wit .
11 Druk " Alt - F8 " om terug te keren naar Access , dan re-run van de vorm met behulp van Step 7's instructies.
12 Controleer en vink het vakje . Het programma dat je herzien zal de achtergrondkleur van veranderen " Veld2 . "
|
