Discussion :

[cazadeis]

Bonsoir,

je débute en vb et je bloque sur quelque chose qui ne doit pas être très difficile à résoudre.
Je développe une petite application pour apprendre à exploiter une base de donnée Mysql. J'ai donc créé un formulaire qui modifie un fichier de configuration qui contient tous les paramètres :

# serveur
#user, etc.....

J'utilise donc ce fichier pour me connecter à ma BDD et ce que je récupére de la base je l'envoi dans les différents textbox et listbox.
Mon souci est le suivant, une fois la listbox peuplée avec par exemple toutes les tables de la base,je n'arrive pas à spécifier la table qui doit être sélectionnée par défaut (celle dont le nom est contenu dans le fichier de config). Je pensais que ; listbox.selectItem= variable contenant le nom de la table du fichier était la solution mais cela ne fonctionne pas.

Quelqu'un peu m'aider pour cela SVP.

Merci beaucoup

[tomlev]

comment as-tu rempli la listbox ?
manuellement (listBox1.Items.Add) ?
avec le data binding (listBox.DataSource/DisplayMember/ValueMember) ?

Avec la 1e approche, il faut trouver l'index de l'élément à sélectionner et affecter cette valeur à la propriété SelectedIndex.

Avec la 2e approche, il suffit d'affecter la valeur voulue à SelectedValue

[Pol63]

comment as-tu rempli la listbox ?
manuellement (listBox1.Items.Add) ?
avec le data binding (listBox.DataSource/DisplayMember/ValueMember) ?

Avec la 1e approche, il faut trouver l'index de l'élément à sélectionner et affecter cette valeur à la propriété SelectedIndex.

Avec la 2e approche, il suffit d'affecter la valeur voulue à SelectedValue

j'ajouterais meme qu'avec la 1ere approche il est aussi possible de setter SelectedItem sans rechercher l'index

[cazadeis]

Merci de vous intéresser à ma question. Voici le code que j'utilise pour renseigner ma listbox :

Code :

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
Dim HostConn As New MySqlConnection 
    Dim da As MySqlDataAdapter 
    Dim DDD As MySqlDataAdapter
    Dim dst As New DataSet 


'Ouverture d'une connexion SQL :
        HostConn.ConnectionString = "server=" + serveur + ";user id=" + user + ";password=" + mdp + ";database=" + database
        Try
            HostConn.Open()

            'Affichage  de la liste des bases de données dans listbox :
            da = New MySqlDataAdapter("Show databases", HostConn)
            da.Fill(dst, "database")
        Catch myerror As MySqlException
            MessageBox.Show("Error Connecting to Database: " & myerror.Message)
        End Try
        ListBox_Bdd_Parametres.DataSource = dst.Tables("database")
        ListBox_Bdd_Parametres.DisplayMember = "Database"
        ListBox_Bdd_Parametres.Refresh()

[tomlev]

Ajoute cette ligne à la fin :

Code :

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

ListBox_Bdd_Parametres.ValueMember = "Database"

Pour l'initialiser sur l'élément que tu veux, il suffit de faire ça :

Code :

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

ListBox_Bdd_Parametres.SelectedValue = "LaBaseQueTuVeux"

Et le Refresh ne sert à rien...

[cazadeis]

Ca fonctionne, merci beaucoup.