Komandos funkcija

Pastabos

Kai "Access" paleidžiama iš komandinės eilutės, bet kokia po /cmd parinktimi esanti komandų eilutės dalis perduodama programai kaip komandų eilutės argumentas. Galite naudoti funkciją Command , kad būtų pateiktas perduotas argumentas.

Norėdami pakeisti komandų eilutės argumentą atidarius duomenų bazę:

1. Meniu Failas spustelėkite "Access" parinktys.

2. Dialogo lange Programos parametrai spustelėkite Išsamiau.

3. Lauke Komandų eilutės argumentai įveskite naują argumentą.

Dabar komandos funkcija pateiks naują įvestą argumentą.

Kai komandos funkcija naudojama kur nors kitur, o ne "Visual Basic for Applications" (VBA) kode modulyje, po funkcijos reikia įterpti tuščius skliaustus. Pavyzdžiui, norėdami naudoti funkciją Command formos teksto lauke, teksto lauko ypatybę ControlSource reikėtų nustatyti kaip išraiška, pvz.:

=Command()

Pavyzdys

Toliau pateiktame pavyzdyje parodyta, kaip paleisti "Access" su komandų eilutės argumentu, tada parodoma, kaip grąžinti šio argumento reikšmę naudojant funkciją Command .

Norėdami išbandyti šį pavyzdį, spustelėkite "Windows" mygtuką Pradėti , tada spustelėkite Vykdyti. Įveskite šį kodą lauke Vykdyti vienoje eilutėje. (Komandų eilutės informacijos dalis turite išskirti kabutėse).

"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"

Tada sukurkite naują modulį "Northwind Traders" duomenų bazės pavyzdyje ir įtraukite šią antrinę procedūrą:

Public Sub CheckCommandLine()
    ' Check the value returned by Command function and display
    ' the appropriate form.
    If Command = "Orders" Then
        DoCmd.OpenForm "Orders"
    ElseIf Command = "Employees" Then
        DoCmd.OpenForm "Employees"
    Else
        Exit Sub
    End If
End Sub

Kai iškviečiate šią procedūrą, "Access" atidaro formą Užsakymai. Galite sukurti makrokomandą AutoExec, kad automatiškai iškviestumėte šią procedūrą atidarius duomenų bazę.