Discussion :

[immmene]

voilà bonjour à tous je suis tres debutante en vb et voici mon probleme
dans le form1 j'ai un bouton "AFFICHER" qui affiche les etudiants à partir d'une bd access moi je veux qu'il m'affiche les etudiante dans un autre form
donc j'ai mis

Code :

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

1
2
3
Private Sub Command5_Click()
Form2.Show
End Sub

maintenant je veux savoir ce que je dois mettre dans le FORM2
et voilà le code que je veux integrer dans le FORM2

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
Private Sub afficher_Click()
'creer une connection
Set cn = New Connection
cn.Open "DSN=base"
Dim rs As New Recordset
Set rs.ActiveConnection = cn
rs.Open "select [code_e],[nom_e],[prenom_e],[adress],[tel],[date_nais],[lieu_nais],[code_sess],[code_op],[code_dep] from etudiant"
Do While Not rs.EOF
code.AddItem rs("code_e")
nom.AddItem rs("nom_e")
prenom.AddItem rs("prenom_e")
adresse.AddItem rs("adress")
telephone.AddItem rs("tel")
date_nais.AddItem rs("date_nais")
lieu_nais.AddItem rs("lieu_nais")
code_sess.AddItem rs("code_sess")
code_op.AddItem rs("code_op")
code_dep.AddItem rs("code_dep")
 
rs.MoveNext
Loop
rs.Close

merci d'avance

[iclic]

Bonjour,

Dans le Form Load de Form2

Code :

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

1
2
 
Form1.afficher_Click

A+

[nsanabi]

tu reprend TOUT le code de ta sub afficher_Click() et tu le met dans l'évènement form_load de ta form2, il suffit que tu place dans ta form2 les controles qui seront remplis par les données (textbox,listbox,flexgrid,listview etc.)