Discussion :

[P_Mercier]

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 VB.Net :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Etanne]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[P_Mercier]

Un grand merci !