Il y a actuellement 314 visiteurs
Jeudi 28 Mars 2024
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...
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 Aide suite à une analyse FRST contre un virus vbc.exe
Bonjour tout le monde, J'ai récemment constaté que j'étais infecté par un virus lié à vbc.exe, ce qui entraîne une utilisation du CPU allant jusqu'à 30% voire 40%. J'ai donc effectué mes analyses FRST et voici les rapports obtenus : - FRST.txt: https://pjjoint.malekal.com/files.php?id=FRST_20240315_ ...
Réponses: 3

Message : besoin d'aide pour un pc portable à 500 euros
Bonjour à tous, J'ai besoin d'un sacré coup de main et de vos compétences. Voilà, j'ai un ami de mon fils avec ses frères et s?urs. Ils vont casser leur tirelire pour acheter un PC portable à leur s?ur pour son anniversaire . Elle va avoir 17 ans car leurs parents ne peuvent pas se le permettre . ...
Réponses: 3

Message [Réglé] Cherche une application Music alternative
Bonjour,Je rencontre un problème récurrent avec mon Redmi note 10S et son application Music.J'ai beau charger des fichiers et les stocker dans le dossier prévu pour cela, lorsque l'application est lancéeelle n'accède qu'à quelques titres par album, parfois un seul.De plus, la lecture ne peut être qu ...
Réponses: 3

Message Aide pc portable
Bonjour,Je souhaiterai faire plaisir à ma femme et lui acheter un pc portable qui ferait tourner world of warcraft en haute qualité (élevé ou ultra sans lag). J?ai fait un peu le tour sur le forum pour pas faire de doublon mais je n?ai rien trouvé. J?ai un petit budget max 700 euros avec un écran au ...
Réponses: 5

Message [réglé] aide pour achat imprimante compatible chromebook
Bonjour à tous, j'ai besoin d'acheter une imprimante laser n/b et couleur compatible Chromebook (un acer)Quelqu'un pourrait-il m'aider car je ne trouve rien par les moteurs de recherche. Les réponses données ne sont pas compatibles.Un grand merci pour votre aide
Réponses: 6

Message Aide achat PC Portable
Bonjour Je viens sur le forum car j'envisage de changer de PC Portable et j'ai besoin d'aide !! Mon PC actuel : PC Portable ASUS R415UA-EB035T - 14" FHD sur lequel je suis passé de 8Go de mémoire vive à 16Go de mémoire vive Mon budget : 800 euros max Mon utilisation : internet et Word et lectur ...
Réponses: 9

Message [Réglé] Aide nettoyage pc
Bonjour, mon pc rame et j'aimerais avoir votre aide pour déjà vérifier si il n'est pas infecté
Réponses: 12


Qui est en ligne

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


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