Méthode Application.DeleteReportControl (Access)
La méthode DeleteReportControl supprime un contrôle spécifié à partir d'un état.
Syntaxe
expression. DeleteReportControl (ReportName, ControlName)
expressionUne variable qui représente un objetApplication.
Paramètres
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
ReportName | Obligatoire | String | Nom du rapport contenant le contrôle que vous souhaitez supprimer. |
Nom_contrôle | Obligatoire | String | Nom du contrôle à supprimer. |
Valeur renvoyée
Aucune
Remarques
La méthode DeleteReportControl est disponible uniquement en mode Création de formulaire ou état en mode Création, respectivement.
Remarque
Si votre Assistant est destiné à supprimer un contrôle d'un formulaire ou d'un état, il doit d'abord demander l'ouverture du formulaire ou de l'état en mode Création avant de pouvoir supprimer le contrôle.
Exemple
Cet exemple montre comment créer un formulaire contenant un bouton de commande et afficher un message demandant à l'utilisateur s'il souhaite supprimer le bouton de commande. Si l’utilisateur choisit Oui, le bouton de commande est supprimé.
Sub DeleteCommandButton()
Dim frm As Form, ctlNew As Control
Dim strMsg As String, intResponse As Integer, _
intDialog As Integer
' Create new form and get pointer to it.
Set frm = CreateForm
' Create new command button.
Set ctlNew = CreateControl(frm.Name, acCommandButton)
' Restore form.
DoCmd.Restore
' Set caption.
ctlNew.Caption = "New Command Button"
' Size control.
ctlNew.SizeToFit
' Prompt user to delete control.
strMsg = "About to delete " & ctlNew.Name &". Continue?"
' Define buttons to be displayed in dialog box.
intDialog = vbYesNo + vbCritical + vbDefaultButton2
intResponse = MsgBox(strMsg, intDialog)
If intResponse = vbYes Then
' Delete control.
DeleteControl frm.Name, ctlNew.Name
End If
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.