OpenArgs, propriété

S’applique à

Détermine l’expression de chaîne spécifiée par l’argument ArgOuverture de la méthode OuvrirFormulaire qui a ouvert un formulaire. Variant en lecture/écriture.

expression.ArgOuverture

expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.

Remarques

Cette propriété est disponible uniquement en utilisant une macro ou un code Visual Basic pour Applications (VBA) avec la méthode OuvrirFormulaire de l’objet DoCmd. Cette définition de propriété est en lecture seule dans tous les modes.

Pour utiliser la propriété ArgOuverture, ouvrez un formulaire à l’aide de la méthode OuvrirFormulaire de l’objet DoCmd, puis définissez l’argument ArgOuverture sur l’expression de chaîne souhaitée. La définition de propriété ArgOuverture peut être utilisée dans un code pour le formulaire, comme dans une procédure événementielle Ouvrir. Vous pouvez également faire référence à la définition de propriété dans une macro, telle qu’une macro Ouvrir, ou dans une expression définissant la propriété SourceContrôle pour un contrôle sur le formulaire.

Par exemple, supposons que le formulaire que vous ouvrez est une liste de clients de type formulaire continu. Si vous souhaitez que le focus se positionne sur un enregistrement client spécifique lorsque le formulaire s’ouvre, vous pouvez définir la propriété ArgOuverture sur le nom du client, puis utiliser l’action TrouverEnregistrement dans une macro Ouvrir pour déplacer le focus sur l’enregistrement du client dont le nom est spécifié.

Exemple

L’exemple suivant utilise la propriété ArgOuverture pour ouvrir le formulaire Employees (Employés) sur l’enregistrement d’un employé spécifique, et montre comment la méthode OuvrirFormulaire définit la propriété ArgOuverture. Vous pouvez exécuter cette procédure de façon appropriée, par exemple, lorsque l’événement AprèsMAJ se produit pour une boîte de dialogue personnalisée pour l’entrée de nouvelles informations sur un employé.

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

L’exemple suivant utilise la méthode FindFirst pour rechercher l’employé nommé dans la propriété ArgOuverture.

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