Bonjour,

Je suis un débutant et je souhaite avoir un peu d'aide pour un projet de base de données access.

J'ai une Form1
Listbox1
Textbox1

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
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Imports System.Data
Imports System.Data.OleDb
 
 
Public Class Form1
 
 
    Dim MyConnexion As OleDbConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data source= C:\Users\Milardi\Documents\Contacts.accdb")
    Dim Mycommand As OleDbCommand = MyConnexion.CreateCommand()
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
 
        Try
            Mycommand.CommandText = "SELECT NOM FROM CONTACTS"
            MyConnexion.Open()
 
        Catch ex As OleDbException
 
            MsgBox(ex.Message)
 
        End Try
 
        Dim myReader As OleDbDataReader = Mycommand.ExecuteReader()
 
        Do While myReader.Read()
 
            ListBox1.Items.Add(myReader.GetString(0))
 
 
        Loop
 
        myReader.Close()
 
        MyConnexion.Close()
 
    End Sub
 
 
    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
 
 
 
 
 
    End Sub
End Class
Je voudrais afficher les informations liées et restante sur la même table quand je clique sur le nom dans la listbox.

J'espère de j'ai été clair dans mes propos.

Merci d'avance.
--