Il y a actuellement 186 visiteurs
Vendredi 17 Septembre 2021
accueilactualitésdossierscomparer les prixtélécharger gratuitement vos logicielsoffres d'emploiforum informatique
Connexion
Créer un compte

Besoin d'aide sur une application VB .Net

Besoin d'aide pour configurer un serveur ? Vous souhaitez obtenir des conseils pour référencer votre site ? Un petit souci pour accéder à votre FTP ? Des soucis de programmation en PHP / ASP / HTML / XHTML / XML / XSLT / CSS / ReactJS / AngularJS / VueJS / CGI / PERL / C / MySQL / PostgreSQL ??? Nous avons peut-être la solution dans ce forum ...

Besoin d'aide sur une application VB .Net

Message le 17 Mai 2012 11:36

Bonjour à tous.
Je développe une application sur VB .Net et j'aimerais savoir comment remplir une DataGridView en fonction des éléments choisis dans une ComboBox.
Merci d'avance pour votre aide.
patrickdab
Visiteur Confirmé
Visiteur Confirmé
 
Messages: 19
Inscription: 03 Mai 2010 11:19
 


Re: Besoin d'aide sur une application VB .Net

Message le 17 Mai 2012 13:21

Salut,

Je ne connais pas VB.net, mais j'imagine qu'il faut que tu lances un reload de ton grid en captant l'event lancé par ta combobox au changement de la valeur sélectionnée. Malheureusement c'est tout ce que je peux te dire pour l'instant, étant donné que je suis totalement novice en .net...
En cas de problème constaté sur un sujet, contactez un modérateur par MP. N'intervenez pas vous-même. Merci bien.
Aucune aide ni support ne sera fourni par MP.
Avatar de l'utilisateur
H3bus
Moderateur
Moderateur
 
Messages: 12195
Inscription: 08 Avr 2008 15:13
Localisation: /home/h3bus
 

Re: Besoin d'aide sur une application VB .Net

Message le 16 Oct 2012 18:40

Bonjour,

Si ton DataGridView est bindé sur une collection, tu peux utiliser les méthodes LinQ (présent sur vb2008 et plus)

Code: Tout sélectionner
Imports System.Linq

Public Class Test_Local

#Region "--- Attributs ---"

   Private zListeClient As New List(Of ObjPerso) ' Classe ObjPerso définit au bas

#End Region

#Region "--- Propriétés ---"

   Public Property ListeClient() As List(Of ObjPerso)
      Get
         Return Me.zListeClient
      End Get
      Set(ByVal value As List(Of ObjPerso))
         Me.zListeClient = value
      End Set
   End Property

#End Region

#Region "--- Méthodes ---"

   Private Sub Test_Local_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      ChargerDomaine()
      InitialiseDGV()
   End Sub

   Public Sub New()

      ' Cet appel est requis par le Concepteur Windows Form.
      InitializeComponent()

      ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().

   End Sub

   Public Sub ChargerDomaine()

      ' Liste d'élément
      Dim Entite As New ObjPerso

      Entite.Nom = "Hoaz"
      Entite.Prenom = "Pelloc"
      ListeClient.Add(Entite)

      Entite = New ObjPerso
      Entite.Nom = "Dab"
      Entite.Prenom = "Patrick"
      ListeClient.Add(Entite)

      ' Liste du combobox
      Me.ComboBox1.Items.Add("")
      Me.ComboBox1.Items.Add("Patrick")
      Me.ComboBox1.Items.Add("Pelloc")

   End Sub

   Private Sub InitialiseDGV()

      Me.DataGridView1.DataSource = ListeClient

   End Sub

   Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

      If (Not (String.IsNullOrEmpty(Me.ComboBox1.Text))) Then
         Dim Liste As List(Of ObjPerso) = _
            (From EntX As ObjPerso In ListeClient _
             Select EntX _
             Where EntX.Prenom = Me.ComboBox1.Text).ToList
         Me.DataGridView1.DataSource = Liste
      End If

   End Sub

#End Region

End Class


Public Class ObjPerso

   Private zNom As String
   Private zPrenom As String

   Public Property Nom() As String
      Get
         Return Me.zNom
      End Get
      Set(ByVal value As String)
         Me.zNom = value
      End Set
   End Property

   Public Property Prenom() As String
      Get
         Return Me.zPrenom
      End Get
      Set(ByVal value As String)
         Me.zPrenom = value
      End Set
   End Property

   Public Sub New()

   End Sub

End Class


Créer un nouveau projet avec un DGV et un TBX et tu pourras tester le tout.

Bonne continuité.

Pelloc
Pelloc
Visiteur
Visiteur
 
Messages: 2
Inscription: 16 Oct 2012 17:52
 



Sujets similaires

Message nouvelle config aide compatibilité
Bonjour a tousje voudrais changer mon pc et j'aimerais de l'aidej'ai choisis la carte mére CARTE MÈRE ASUS ROG STRIX Z590-A GAMING WIFI - Z590/LGA1200/ATXavec un chipset Z590Et un processeur PROCESSEUR INTEL CORE I7-10700KF avec un chipset Z490ma question les deux sont il compatible en sachant que l ...
Réponses: 3

Message Besoin de conseil pour Upgrade PC motion designer
Bonjour Etant motion designer et monteur vidéo en freelance (je travail essentiellement sur After Effect, premiere pro, illustator et photoshop) j'aurais besoin de conseil dans le but de upgrade ma configuration actuelle: CPU: Intel Core i7 6800K Cadencé à 3.40 GHzCM: MSI X99A RAIDER (MS-7885) 5. ...
Réponses: 0

Message Aide à la décision + besoins informatique
Bonjour à tous,Je viens vers vous car j'ai besoins de quelques conseils de la part de personnes régulièrement au courant des évolutions du monde PC. Je vais mettre mes quelques questions en gras pour faciliter le repérage J'ai acheté il y a 3 ans environ une tour pour un budget d'environ 1000 ? av ...
Réponses: 80

Message vraiment besoin de vous....
comme vous le savez j'ai 46 ans je suis en formation technicien assistance informatique et, aujourd'hui j'ai eu un pré-entretien téléphonique pour peut être enfin un joooobbbbb.... seulement dans les entretiens on me parle toujours de masterisation....J'ai besoin de ce job vraiment.... mais en maste ...
Réponses: 1

Message affichage erroné du nom d'un fichier vidéo - besoin d'aide
BonjourJe vous explique mon problème : quand j'utilise mon player freebox en tant que lecteur réseau, le nom de plusieurs fichiers vidéo (en MKV) est affiché de manière "erronée" (si je puis m'exprimer ainsi) à l'écran.Ainsi, un fichier que j'ai intitulé "1 Le Concert" apparaît à ...
Réponses: 2

Message [Réglé] Aide à l'achat ordi fixe
Bonjour à tous,Je reviens vers vous pour avoir des conseils sur l'achat d'une tour pour mon activité professionnel.Je suis dessinateur projeteur en bâtiment et souhaite investir dans un ordi.A mon taf, je suis sur un ACER Veriton M4640G INTEL CORE i7-6700 3.40 GHz RAM 16 GoCG: NVIDIA Quadro K2000D ...
Réponses: 16

Message Besoin de disque dur
Bonjour ,Je possède un pc avec 3 disques durs qui commencent à fatiguer ( 12 ans ) . je souhaiterai les changer avec des disques durs ssd . Avec tout ce que l'on peut trouver de nos jours sur le marché je suis un peu perdu . J'aurai besoin de vos conseils svp . Les 3 ssd que j?envisagerai d'achet ...
Réponses: 2


Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 5 invités


.: Nous contacter :: Flux RSS :: Données personnelles :.