Egenskaben OpenArgs

Vigtigt: Denne artikel er maskinoversat. Se ansvarsfraskrivelsen. Du kan finde den engelske version af denne artikel her til din orientering.

Gælder for

Formularobjekt

Rapportobjekt

Bestemmer det strengudtryk, der er angivet af argumentet OpenArgs i metoden ÅbnFormular, der åbnede en formular. Variant med læse/skriveadgang.

udtryk.OpenArgs

udtryk Obligatorisk. Et udtryk, der returnerer et af objekterne på listen Gælder for.

Bemærkninger

Denne egenskab er tilgængelig, kun ved hjælp af en makro eller ved hjælp af Visual Basic for Applications (VBA) kode med metoden OpenForm i objektet DoCmd . Denne indstilling af egenskaben er skrivebeskyttet i alle visninger.

Hvis du vil bruge egenskaben OpenArgs, skal du åbne en formular ved at anvende metoden ÅbnFormular i objektet DoCmd og angive argumentet OpenArgs til de ønskede strengudtryk. Indstillingen for egenskaben OpenArgs kan derefter bruges i kode til formularen, f.eks. i en hændelsesprocedure af typen Open. Du kan også henvise til egenskabsindstillingen i en makro, f.eks. en Åbn-makro eller et udtryk, f.eks. et udtryk, der indstiller egenskaben Kontrolelementkilde for et kontrolelement i formularen.

Antag f.eks, at du åbner formularen er en fortløbende formular liste over klienter. Hvis du vil fokus skal flyttes til en bestemt klient-post, når formularen åbnes, kan du angive egenskaben OpenArgs til klientens navn og derefter bruge handlingen FindPost i en Åbn-makro til at flytte fokus til posten for klienten med det angivne navn.

Eksempel

I følgende eksempel anvendes egenskaben OpenArgs til at åbne formularen Medarbejdere til en bestemt medarbejderpost og viser, hvordan metoden ÅbnFormular indstiller egenskaben OpenArgs. Du kan køre denne denne procedure efter behov  – f.eks. når hændelsen EfterOpdatering indtræffer for en tilpasset dialogboks, der er anvendt til indtastning af nye oplysninger om en medarbejder.

Sub OpenToCallahan()
DoCmd.OpenForm "Employees", acNormal, , , _
acReadOnly, , "Callahan"
End Sub
Sub Form_Open(Cancel As Integer)
Dim strEmployeeName As String
' If OpenArgs property contains employee name, find
' corresponding employee record and display it on
' form. For example,if the OpenArgs property
' contains "Callahan", move to first "Callahan"
' record.
strEmployeeName = Forms!Employees.OpenArgs
If Len(strEmployeeName) > 0 Then
DoCmd.GoToControl "LastName"
DoCmd.FindRecord strEmployeeName, , True, , _
True, , True
End If
End Sub

I næste eksempel bruges metoden FindFirst til at finde den medarbejder, der er angivet i egenskaben OpenArgs.

Private Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
Dim strEmployeeName As String
strEmployeeName = Me.OpenArgs
Dim RS As DAO.Recordset
Set RS = Me.RecordsetClone
RS.FindFirst "LastName = '" & _
strEmployeeName & "'"
If Not RS.NoMatch Then
Me.Bookmark = RS.Bookmark
End If
End If
End Sub

Bemærk: Ansvarsfraskrivelse for maskinoversættelse: Denne artikel er blevet oversat af et computersystem uden menneskelig indgriben. Microsoft tilbyder disse maskinoversættelse for at hjælpe ikke-engelsktalende brugere til at kunne nyde indhold om Microsofts produkter, tjenester og teknologier. Da artiklen er maskinoversat, kan den indeholde forkerte ord eller syntaks- eller grammatikfejl.

Del Facebook Facebook Twitter Twitter Mail Mail

Var disse oplysninger nyttige?

Fantastisk! Har du mere feedback?

Hvordan kan vi forbedre det?

Tak for din feedback!

×