[VB.NET] ouverture d'une DataGrid par bouton

Salut, j'ai un petit problème lors de l'ouverture d'un DataGrid.

En effet, au départ, lorsque ma page s'ouvre, je ne veux pas voir cette DataGrid. Par contre, quand je click sur un boutton, je veux l'afficher.

Le problème est que ma DataGrid s'affiche dès le début. Je ne vois pas pourquoi.
Voici la partie du code qui devrait ouvrir la DataGrid après avoir cliquer sur Button1

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click   Dim chaine As String chaine = "SELECT fiche.[N°fiche],fiche.[N°client],client.nomsociete,fiche.[N°materiel],materiel.designation,materiel.marque,materiel.type,fiche.[N°serie],fiche.refclient,fiche.date,fiche.encours,fiche.termine,fiche.nondepanne,fiche.bordereau,fiche.bonpourdevis FROM materiel INNER JOIN (client INNER JOIN fiche ON fiche.[N°client]=client.[N°client]) ON fiche.[N°materiel]=materiel.[N°materiel]where (fiche.termine=1 OR fiche.nondepanne=1) and (fiche.accepte=1 OR fiche.refuse=1) and fiche.bordereau = 0 and fiche.present = 1 ORDER BY client.nomsociete, fiche.[N°fiche] desc"   DataGrid1.Visible = False affiche_grille(chaine) format_grille(Me.DataGrid1, New FormatCellEventHandler(AddressOf FormatGridCells)) Label22.Text = DataGrid1.BindingContext(DataGrid1.DataSource, DataGrid1.DataMember).Count DataGrid1.Visible = True

---

Je remercie par avance ceux pouvant m'aider à corriger cette erreur

Deux solutions:
Soit dans le load de ta page tu définis la propriété visible de ton DataGrid à False
Soit tu le fais visuellement dans le concepteur de formulaire.

le "load", c'est le tout début de mon programme?

Dans ma partie load, j'ai déjà ce bout de code:

Code:

---

1 2	DataGrid1.Visible = False affiche_grille(chaine)

---

Et affiche_grille fait quoi?

affiche_ grille me permet d'aller chercher les données de ma DataGrid dans une base de données Access

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Public Sub affiche_grille(ByVal chaine)   Dim MyConnection As System.Data.OleDb.OleDbConnection Dim ds As New System.Data.DataSet Dim ad As System.Data.OleDb.OleDbDataAdapter     'affichage dans la grille Try chaine = "SELECT fiche.[N°fiche],fiche.[N°client],client.nomsociete,fiche.[N°materiel],materiel.designation,materiel.marque,materiel.type,fiche.[N°serie],fiche.refclient,fiche.date,fiche.bonpourdevis,fiche.termine,fiche.nondepanne,fiche.[N°devis] FROM materiel INNER JOIN (client INNER JOIN fiche ON fiche.[N°client]=client.[N°client]) ON fiche.[N°materiel]=materiel.[N°materiel] where fiche.bonpourdevis = 1 and fiche.[N°devis] = 0 and fiche.bordereau = 0 and fiche.accepte = 0 ORDER BY fiche.date" MyConnection = New System.Data.OleDb.OleDbConnection(accessconnect) ad = New System.Data.OleDb.OleDbDataAdapter(chaine, MyConnection) ds = New System.Data.DataSet ad.Fill(ds) DataGrid1.DataSource = ds.Tables(0) Catch eLoad As System.Exception MsgBox(eLoad.Message) Finally MyConnection.Close() End Try

---

Si tu ne laisses que le page_load s'executé sans passer dans affiche_grille,
est-ce que ton DataGrid est visible?
Peux tu éventuellement envoyer ton code pour que je le teste?

Je ne sais pas vraiment utiliser les points d'arrêt pour tester une partie de code.

Sinon, pour envoyer un code, c'est en message privé?

Mets le entre les balises [Code]
Sinon pour utiliser les points d'arrêts, mets toi dans la goutière(partie grise à gauche de ta feuille de code et clique dessus. Un point rouge doit apparaitre. ensuite tu lances ton projet et l'execution doit s'arrêter sur ton point d'arrêt. Sinon tu as tout ce qu'il faut dans le menu Débogage...

excuse, je dois y aller. La boîte va fermer.
Merci, à demain j'espère.