Comment faire pour lier un tableau d'objets à un formulaire Windows à l'aide de Visual Basic .NET ou Visual Basic 2005

Traductions disponibles Traductions disponibles
Numéro d'article: 313639 - Voir les produits auxquels s'applique cet article
Cet article a été archivé. Il est proposé « en l'état » et ne sera plus mis à jour.
Agrandir tout | Réduire tout

Sommaire

Résumé

Cet article étape par étape explique comment lier un tableau d'objets à un formulaire Windows. L'exemple de cet article comporte un formulaire Windows avec trois zones de texte pour afficher les propriétés d'objet. L'exemple comporte aussi des quatre boutons de commande pour parcourir la classe Array .

Configuration requise

La liste suivante met en évidence le matériel recommandé, logiciels, infrastructure réseau, compétences, connaissances et service packs dont vous avez besoin :
  • Microsoft Visual Basic .NET ou Microsoft Visual Basic 2005
  • Intermédiaire compréhension de Visual Basic concepts de programmation

Description du code

Cette section présente les concepts de codage sont nécessaires pour accomplir cette tâche.

Créer la classe

Une classe qui est liée à un formulaire doit utiliser accesseurs de propriété. Toute propriété qui est liée doit contenir le jeu de propriétés et les méthodes Property Get . La classe qui est utilisée par l'exemple de cet article comporte trois propriétés (qu'un seul est affiché dans cette section). L'exemple de cet article comporte également un constructeur paramétré, bien que cela ne soit pas nécessaire.
Public Class guitar
    Private m_make As String
    Private m_model As String
    Private m_year As Short

    Public Sub New(ByVal make, ByRef model, ByVal year)
        Me.make = make
        Me.model = model
        Me.year = year
    End Sub
    Public Property make() As String
        Get
            Return m_make
        End Get
        Set(ByVal Value As String)
            m_make = Value
        End Set
    End Property 
End Class
				

Ajouter des instances de classe à un groupe

L'étape suivante consiste à créer les objets et les ajouter à la classe Array :
Dim al(2) As guitar

al(0)  = new guitar("Gibson", "Les Paul", 1958)
al(1)  = new guitar("Fender", "Jazz Bass", 1964)
al(2)  = new guitar("Guild", "Bluesbird", 1971)
				

Lier les propriétés aux contrôles de formulaire

Une fois le groupe est remplie, vous pouvez lier individuellement les propriétés de l'objet à des contrôles Windows Forms. Pour ce faire, appelez la méthode Add de la propriété DataBindings du contrôle TextBox . En outre, vous devez passer la propriété du contrôle qui est liée, le nom de la matrice et la propriété de l'objet.
textBox1.DataBindings.Add("Text", al, "make")
textBox2.DataBindings.Add("Text", al, "model")
textBox3.DataBindings.Add("Text", al, "year")
				

Fournir un significative pour parcourir dans le groupe

Dans l'étape finale de ce processus, vous utilisez une classe CurrencyManager pour parcourir le groupe . Pour ce faire, associer la CurrencyManager à la BindingContext du formulaire (dans ce cas, le groupe ).
Private cMan As CurrencyManager

cMan = CType(Me.BindingContext(al), CurrencyManager)
				
la classe CurrencyManager possède une propriété position que vous pouvez manipuler pour effectuer une itération sur les membres de la matrice . En ajoutant à ou en soustrayant de, la valeur actuelle de position , vous pouvez afficher différents membres de la matrice dans l'écran. Par exemple :
'Move forward one element.
cMan.Position += 1
'Move back one element.
cMan.Position -= 1
'Move to the beginning.
cMan.Position = 0
'Move to the end.
cMan.Position = al.Length - 1
				

Exemple pas à pas

  1. Ouvrez un nouveau projet Application Windows dans Visual Basic .NET ou Visual Basic 2005. Form1 est ajouté au projet par défaut.

    note Le code doit être modifié dans Visual Basic 2005. Si vous créez un nouveau formulaire nommé Form1 dans Visual Basic 2005, vous avez un fichier Form1.vb pour votre code et un fichier Form1.Designer.vb qui contient la section générée automatiquement. Les Windows Forms Designer utilise le mot clé partiel pour répartir l'implémentation de Form1 en deux fichiers distincts. Cela empêche le code émis pour le concepteur d'être insérés dans votre code.

    Pour plus d'informations sur les nouvelles améliorations de langage Visual Basic 2005, reportez-vous au site de Web Microsoft suivant :
    http://msdn2.microsoft.com/en-us/library/ms379584(vs.80).aspx
    Pour plus d'informations sur des classes partielles et le concepteur Windows Forms, reportez-vous au site de Web Microsoft suivant :
    http://msdn2.microsoft.com/en-us/library/ms171843.aspx
  2. Ajouter une classe au projet.
  3. Remplacez le code de Class1.vb avec le code suivant :
    Public Class guitar
        Private m_make As String
        Private m_model As String
        Private m_year As Short
    
        Public Sub New(ByVal make, ByRef model, ByVal year)
            Me.make = make
            Me.model = model
            Me.year = year
        End Sub
        Public Property make() As String
            Get
                Return m_make
            End Get
            Set(ByVal Value As String)
                m_make = Value
            End Set
        End Property
        Public Property model() As String
            Get
                Return m_model
            End Get
            Set(ByVal Value As String)
                m_model = Value
            End Set
        End Property
        Public Property year() As Short
            Get
                Return m_year
            End Get
            Set(ByVal Value As Short)
                m_year = Value
            End Set
        End Property
    End Class
    					
  4. Ajouter trois contrôles TextBox à Form1 et puis organiser les contrôles horizontalement.
  5. Ajoutez quatre contrôles de bouton à Form1 et de puis organiser les contrôles horizontalement.
  6. Modifiez la propriété des boutons comme suit :
    Réduire ce tableauAgrandir ce tableau
    BoutonTexte
    Button1Suivant
    Button2Précédent
    Bouton3Premier
    Button4Dernier

  7. Ajoutez le code suivant à la section de déclaration de Form1 :
    Private al(2) As guitar
    Private cMan As CurrencyManager
    					
  8. Ajoutez le code suivant à l'événement Form_Load :
    al(0)  = new guitar("Gibson", "Les Paul", 1958)
    al(1)  = new guitar("Fender", "Jazz Bass", 1964)
    al(2)  = new guitar("Guild", "Bluesbird", 1971)
    
    cMan = CType(Me.BindingContext(al), CurrencyManager)
    
    TextBox1.DataBindings.Add("Text", al, "make")
    TextBox2.DataBindings.Add("Text", al, "model")
    TextBox3.DataBindings.Add("Text", al, "year")
    					

  9. Ajoutez le code suivant après l'événement Form_Load :
    Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
            cMan.Position += 1
    End Sub
    
    Private Sub Button2_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button2.Click
            cMan.Position -= 1
    End Sub
    
    Private Sub Button3_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button3.Click
            cMan.Position = 0
    End Sub
    
    Private Sub Button4_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button4.Click
            cMan.Position = al.Length - 1
    End Sub
    					
  10. Générez et exécutez le projet.
  11. Cliquez sur les boutons pour afficher les éléments du tableau différent. Notez que vous pouvez modifier les valeurs des objets.

Références

Pour plus d'informations, reportez-vous à la rubrique « consommateurs de données sur Windows Forms » dans la documentation de Visual Studio .NET ou Aide en ligne de Visual Studio 2005.

Propriétés

Numéro d'article: 313639 - Dernière mise à jour: lundi 24 février 2014 - Version: 2.7
Les informations contenues dans cet article s'appliquent au(x) produit(s) suivant(s):
  • Microsoft Visual Basic .NET 2002 Initiation
  • Microsoft Visual Basic .NET 2003 Initiation
  • Microsoft Visual Basic 2005
Mots-clés : 
kbnosurvey kbarchive kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB313639 KbMtfr
Traduction automatique
IMPORTANT : Cet article est issu du système de traduction automatique mis au point par Microsoft (http://support.microsoft.com/gp/mtdetails). Un certain nombre d?articles obtenus par traduction automatique sont en effet mis à votre disposition en complément des articles traduits en langue française par des traducteurs professionnels. Cela vous permet d?avoir accès, dans votre propre langue, à l?ensemble des articles de la base de connaissances rédigés originellement en langue anglaise. Les articles traduits automatiquement ne sont pas toujours parfaits et peuvent comporter des erreurs de vocabulaire, de syntaxe ou de grammaire (probablement semblables aux erreurs que ferait une personne étrangère s?exprimant dans votre langue !). Néanmoins, mis à part ces imperfections, ces articles devraient suffire à vous orienter et à vous aider à résoudre votre problème. Microsoft s?efforce aussi continuellement de faire évoluer son système de traduction automatique.
La version anglaise de cet article est la suivante: 313639
L'INFORMATION CONTENUE DANS CE DOCUMENT EST FOURNIE PAR MICROSOFT SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. L'UTILISATEUR ASSUME LE RISQUE DE L'UTILISATION DU CONTENU DE CE DOCUMENT. CE DOCUMENT NE PEUT ETRE REVENDU OU CEDE EN ECHANGE D'UN QUELCONQUE PROFIT.

Envoyer des commentaires

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com