[Débutant] Mon ComboBox n'affiche pas mes données

Mon ComboBox n'affiche pas mes données

Bonjour,

Je ne vois pas pourquoi dans mon ComboBox1 aucun menu déroullant ne s'affiche ? Je suis nouveau en code VB.NET et j'ai beau chercher je ne vois pas comment ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Imports System.Data.SqlClient
 
Public Class Form1
    Dim Connexion As New SqlConnection("Data Source=SERVEUR\PRIVE;Initial Catalog=kevin;User Id=sa;Password=secret;")
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Connexion.Open()
        Try
            Connexion.Open()
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
        Connexion.Close()
 
 
 
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
        Dim Requete As String = "SELECT NomTransporteur from SuiviReception"
 
        ComboBox1.Items.Add(Requete)
 
    End Sub
 
    End Class

Code:

1 2 3 4 5 6 Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged Dim Requete As String = "SELECT NomTransporteur from SuiviReception" ComboBox1.Items.Add(Requete) End Sub
Selon votre code :
Lorsque l'index de l'élément sélectionné dans la combobox a changé, alors on ajoute la valeur suivante "SELECT NomTransporteur from SuiviReception".

Or, je pense que la combobox est toujours vide, donc il ne sera jamais possible de sélectionner une autre valeur (qui lancera l'événement SelectedIndexChanged).

Sur ce tuto de developpez.com ce trouve un bon exemple : Comment remplir un ComboBox avec un DataReader ?

Vous avez juste à mettre ce code dans le Form_Load.

Etanne

Un grand merci ! :)