Svojstvo „OpenArgs“

Važno : Ovaj članak je mašinski prevesti potražite u članku Odricanje odgovornosti. O referencu pronaći verzija ovaj članak ovde na engleskom jeziku.

Primenjuje se na:

Objekat tipa „Form“

Objekat tipa „Report“

Određuje izraz niske naveden u argumentu OpenArgs metoda OpenForm koji je otvorio obrazac. Promenljiv tip za čitanje i pisanje.

izraz.OpenArgs

izraz Zahtevano. Izraz koji vraća jedan od objekata iz liste „Primenjuje se na“.

Primedbe

Svojstvo je dostupno samo pomoću makro ili pomoću programa Visual Basic for Applications (VBA) kôd sa metod OpenForm objekta DoCmd . Ova postavka svojstva je samo za čitanje u svim prikazima.

Otvorite obrazac pomoću metoda OpenForm za objekat tipa DoCmd i postavite argument OpenArgs na željeni izraz niske da biste koristili svojstvo OpenArgs. Postavka svojstva OpenArgs se zatim može koristiti u kodu za obrazac, na primer u otvorenoj procedura za obradu događaja. U mogućnosti ste i da pregledate postavku svojstva u makrou, kao što je otvoreni makro ili izraz, odnosno izraz koji postavlja svojstvo ControlSource za kontrola u obrascu.

Na primer, pretpostavimo da je obrazac koji ste otvorili kontinuirani obrazac liste klijenata. Ako želite fokus da biste premestili određeni zapis klijenta kada se otvori obrazac, možete da postavite svojstvo OpenArgs na ime klijenta i zatim koristite radnju FindRecord u otvorenom makrou da biste premestili fokus na zapis za klijenta sa navedenim imenom.

Primer

Sledeći primer koristi svojstvo OpenArgs za otvaranje obrasca „Zaposleni“ u određenom zapisu zaposlenih i prikazuje kako metod OpenForm postavlja svojstvo OpenArgs. Ovu proceduru možete da pokrenete kada dođe do odgovarajućeg događaja – na primer, prilikom događaja AfterUpdate za prilagođeni dijalog koji se koristi za unos novih informacija o zaposlenom.

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

Sledeći primer koristi metod FindFirst da biste pronašli zaposlenog koji je imenovan u svojstvu 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

Napomena : Odricanje odgovornosti mašinskog prevođenja: ovaj članak je preveden sistem računara bez ljudski interventne. Microsoft nudi ove mašinskog prevoda da pomogne koja nije na engleskom govornih korisnicima da uživate u sadržaju za Microsoft proizvode, usluge i tehnologijama. U članku bio mašinskog prevesti, mogu da sadrže greške u rečnik, sintaksa ili gramatiku.

Unapredite veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Office Insider korisnicima

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Zvuči da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×