Partager via

Comment : émuler un contrôle Tri-state Visual Basic 6.0 dans une application mise à niveau

  • Article

Mise à jour : novembre 2007

Dans Visual Basic 6.0, les Picture, DownPicture et les propriétés DisabledPicture sont utilisés pour afficher des images différentes selon l'état d'un contrôle CheckBox, CommandButton ou OptionButton. Par exemple, lorsqu'un contrôle CheckBox est activé, l'image DownPicture est affichée ; si le contrôle est désactivé, l'image DisabledPicture est affichée.

Dans Visual Basic 2008, vous pouvez obtenir le même effet à l'aide d'un contrôle ImageList comme illustré dans l'exemple suivant.

Remarque :

Vérifiez d'abord votre application Visual Basic 6.0. Si les propriétés DownPicture et DisabledPicture ne sont pas définies au moment du design ou de l'exécution, le comportement devrait rester le même dans Visual Basic 2008.
Remarque :

Selon vos paramètres actifs ou votre édition, les boîtes de dialogue et les commandes de menu que vous voyez peuvent différer de celles qui sont décrites dans l'aide. Pour modifier vos paramètres, choisissez Importation et exportation de paramètres dans le menu Outils. Pour plus d'informations, consultez Paramètres Visual Studio.

Ajout d'un contrôle ImageList

Suivez les étapes suivantes pour modifier l'application mise à niveau si les propriétés DownPicture ou DisabledPicture sont définies.

Pour émuler un contrôle Tri-state

  1. Déterminez les noms de fichiers et les emplacements des images assignées aux propriétés Picture, DownPicture et DisabledPicture, si nécessaire, copiez-les vers votre ordinateur de développement.

  2. À partir de la boîte à outils, ajoutez un contrôle ImageList à votre formulaire.

  3. Dans la fenêtre Propriétés, sélectionnez la propriété Images.

  4. Dans l'Éditeur de la collection Image, ajoutez trois images à utiliser pour le Picture, puis le DownPicture, puis le DisabledPicture.

  5. Si l'une de ces propriétés a été définie au moment de l'exécution, supprimez le code correspondant. Si les propriétés ont été définies au moment du design, ajoutez le code suivant à l'événement Load du formulaire :

    ' Assign the first image (Picture) to the Image property.
CheckBox1.Image = ImageList1.Images(0)

  6. Pour afficher l'image DownPicture au moment de l'exécution, ajoutez le code suivant à l'événement CheckedChanged du contrôle CheckBox.

    If CheckBox1.Checked = True Then
  ' Assign the second image (DownPicture) to the Image property.
  CheckBox1.Image = ImageList1.Images(1)
Else
  ' Assign the first image (Picture) to the Image property.
  CheckBox1.Image = ImageList1.Images(0)
End If

  7. Pour afficher l'image DisabledPicture au moment de l'exécution, ajoutez le code suivant à l'événement EnabledChanged du contrôle CheckBox.

    If CheckBox1.Enabled = False Then
  ' Assign the third image (DisabledPicture) to the Image property.
  CheckBox1.Image = ImageList1.Images(2)
ElseIf CheckBox1.Checked = True Then
  ' Assign the second image (DownPicture) to the Image property
  CheckBox1.Image = ImageList1.Images(1)
Else
  ' Assign the first image (Picture)to the Image property
  CheckBox1.Image = ImageList1.Images(0)
End If

    L'application devrait désormais avoir un comportement en tout point identique à celui qu'elle avait dans Visual Basic 6.0.

Voir aussi

Concepts

Propriété Style pour les utilisateurs de Visual Basic 6.0

Contrôle CheckBox pour les utilisateurs de Visual Basic 6.0

Contrôle CommandButton pour les utilisateurs de Visual Basic 6.0

Contrôle OptionButton pour les utilisateurs de Visual Basic 6.0

Contrôle OptionButton pour les utilisateurs de Visual Basic 6.0

Contrôles utilisateur pour les utilisateurs de Visual Basic 6.0