Création d'une méthode permettant d'afficher une boîte de dialogue

Vous devez commencer par créer la méthode, puis l'ajouter dans l'onglet de propriétés afin de créer un bouton permettant d'afficher la boîte de dialogue.

1. Pointez sur la catégories User, cliquez le bouton droit puis sélectionnez Nouveau > Méthode.
2. Nommez la méthode AfficherAttributsEtendusAvances, puis cliquez sur l'onglet Script de méthode pour saisir le script:

   Sub %Method%(obj)
    ' Show custom dialog for advanced extended attributes 
    Dim dlg
    Set dlg = obj.CreateCustomDialog("%CurrentTargetCode%.Advanced Teradata Attributes")
    If not dlg is Nothing Then
     dlg.ShowDialog()
    End If
   End Sub

3. Sélectionnez l'onglet de propriétés Teradata dans le dossier ProfileUserForms folder, cliquez sur l'outil Bouton de méthode dans la barre d'outils de formulaire, sélectionnez la nouvelle méthode, puis cliquez sur OK pour l'ajouter dans le formulaire.
4. Saisissez Avancées... dans la zone Libellé pour affecter un nom explicite au bouton, puis cliquez sur Aperçu pour voir le résultat dans l'onglet de propriétés :