Proprietà OpenArgs

Importante :  Il presente articolo è stato tradotto automaticamente, vedere la dichiarazione di non responsabilità. Per visualizzare la versione inglese dell'articolo, fare clic qui.

Si applica a

Oggetto Form

Oggetto Report

Determina l'espressione stringa specificata dall'argomento OpenArgs del metodo OpenForm che ha aperto una maschera. Valore Variant di lettura/scrittura.

espressione.OpenArgs

espressione Obbligatorio. Espressione che restituisce uno degli oggetti dell'elenco Si applica a.

Osservazioni

Questa proprietà è disponibile solo se si utilizza un macro o utilizzando Visual Basic for Applications Edition (VBA) con il metodo OpenForm dell'oggetto DoCmd . Impostazione di questa proprietà è di sola lettura.

Per utilizzare la proprietà OpenArgs, aprire una maschera tramite il metodo OpenForm dell'oggetto DoCmd e impostare l'argomento OpenArgs sull'espressione stringa desiderata. L'impostazione della proprietà OpenArgs può quindi essere utilizzata nel codice della maschera, ad esempio in una routine evento Open. È inoltre possibile fare riferimento all'impostazione della proprietà in una macro, ad esempio una macro Open, oppure in un'espressione, ad esempio un'espressione che imposta la proprietà ControlSource di un controllo sulla maschera.

Si supponga ad esempio che il modulo che aperto un elenco di clienti maschera continua. Se si desidera stato attivo per passare a un record specifico client all'apertura del modulo, è possibile impostare la proprietà OpenArgs al nome del cliente e quindi usare l'azione FindRecord in una macro Open per spostare lo stato attivo al record del cliente con il nome specificato.

Esempio

Nell'esempio seguente la proprietà OpenArgs viene utilizzata per aprire la maschera Dettagli dipendente sul record di un dipendente specifico e illustra come il metodo OpenForm imposta la proprietà OpenArgs. È possibile eseguire questa routine quando appropriato, ad esempio quando si verifica l'evento AfterUpdate per una finestra di dialogo personalizzata utilizzata per immettere nuove informazioni su un dipendente.

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

Nell'esempio seguente il metodo FindFirst viene utilizzato per trovare il dipendente il cui nome viene definito tramite la proprietà 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

Nota : Dichiarazione di non responsabilità per la traduzione automatica: Il presente articolo è stato tradotto tramite un software di traduzione automatica e non da una persona. Microsoft offre le traduzioni automatiche per consentire a coloro che non conoscono la lingua inglese di leggere gli articoli sui prodotti, sui servizi e sulle tecnologie Microsoft. Dal momento che l'articolo è stato tradotto automaticamente, potrebbe contenere errori di sintassi, di grammatica o di utilizzo dei vocaboli.

Amplia le tue competenze
Esplora i corsi di formazione
Ottieni in anticipo le nuove caratteristiche
Partecipa al programma Office Insider

Queste informazioni sono risultate utili?

Grazie per i tuoi commenti e suggerimenti

Grazie per il tuo feedback! Potrebbe essere utile metterti in contatto con uno dei nostri operatori del supporto di Office.

×