Salut, voici un exemple avec une BD Access, une table client avec les champs: id,nom,prenom,age. Une connection avec le controle ADODC mais cela n'a pas d'importante tu peux aussi utiliser la référence ADO. Ce qu'il faut retenir c'est que tu doit bien respecter l'order de ton select. ex ici la Columns(0) = client.id, Columns(1)=client.nom ect...
Private Sub Form_Load()
Dim iClient as integer 'Nombre de client
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=client.mdb;Persist Security Info=False"
Adodc1.RecordSource = "SELECT client.id, client.nom, client.prenom,client.age FROM client ORDER BY age ASC"
Set DataGrid1.DataSource = Adodc1
DataGrid1.Columns(0).Visible = False
DataGrid1.Columns(1).Width = 3000
DataGrid1.Columns(2).Width = 6500
DataGrid1.Columns(3).Width = 4000
DataGrid1.Columns(1).Caption = "Nom"
DataGrid1.Columns(2).Caption = "Prénom"
DataGrid1.Columns(3).Caption = "Age"
iClient = Adodc1.Recordset.RecordCount
End Sub