Discussion :

[milki1]

bonjour tous le monde

j'ai rencontré un pti probleme lors du copeir coller d'un code qui marche dans un programme et qui veu pas marché ds mon programme principale alors que j'ai garder les meme nom des outil et des fonction
erreur ''' la déclaration de la procedure ne correspant pas a la description de l'evenement ou de la procédure de la meme nom'''
ya qlq un qui pourra m'expliqué kes ki se passe??
merci

[OhMonBato]

Peux tu éviter l'orthographe SMS stp ? c'est un forum, pas un téléphone portable, merci

A part ça, le mieux est peut être de nous montrer ton code en expliquant où ça coince.

[milki1]

ok je vois desolé
voila mon code

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
Private Sub tvw_AfterLabelEdit(Cancel As Integer, NewString As String)
'après l'édition d'un label
End Sub
Private Sub tvw_BeforeLabelEdit(Cancel As Integer)
'avant l'édition d'un label
'LENOM = tvw.Nodes.Item(3)
End Sub
Private Sub tvw_Click()
'Se produit quand on clique
End Sub
Private Sub tvw_Collapse(ByVal Node As MSComctlLib.Node)
'Se produit quand on réduit
'MsgBox Node exprime le nom du noeud (ex: Noeud 2.1)
End Sub
Private Sub tvw_DblClick()
'Se produit quand on double-clique
Tvw.ImageList = ImageList2
Tvw.Nodes(1).Image = 2
Tvw.Nodes(2).Image = 1
Tvw.Nodes(3).Image = 1
End Sub
Private Sub tvw_Expand(ByVal Node As MSComctlLib.Node)
'Se produit quand on étend
'MsgBox Node    exprime le nom du Noeud (ex: La racine,Noeud 2)
End Sub
Private Sub tvw_NodeCheck(ByVal Node As MSComctlLib.Node)
'Quand un Node est checké
'If Node.Checked = True Then MsgBox Node + " a été sélectionné"    affiche le nom du Noeud Checké
End Sub
Private Sub tvw_NodeClick(ByVal Node As MSComctlLib.Node)
Dim chemin As String
'Se produit lors de la sélection d'un noeud
 
Select Case Node.Key

ca conserne le treeview, enfaite il reconnait pas les fonctions

[avigeilpro]

Quelques balises Code aurait permit une meilleur lecture de ton code
A part cela, je rencontre cette erreur la plupart du temps lorsque je fait un copier collé de code mais que j'ai créé un groupe de controle (alors que dans le projet original il sagissait d'un controle unique), il manque alors le paramètre Index. Je pense que ton problème est du même genre

Le moyen le plus simple est d'enlever la procédure et de la refaire créer automatiquement, puis de coller le contenu de la procédure sans changer la définition de celle-ci

[OhMonBato]

pour rendre ton code plus lisible, édites ton message et sélectionnes ton code, clique ensuite sur le bouton "#" au dessus de la zone d'édition du message.
Je n'ai pas pris la peine de lire ton code pour le moment, mais ça coince où exactement alors ? Tu as bien sûr un treeview sur ta feuille et il a le même nom que celui de ton code ?

[milki1]

oui
excusé moi avigeilpro mais je crois que j'ai pas bien saissi, enfaite j'ai refait tous en tapant le code mais c'est toujours la meme erreur
oui j'ai verifié le nom de mon treeview, c'est une erreur des fonction copiers

[avigeilpro]

J'ai repris les déclarations que tu as donné et ai créé l'executable sans aucun problème. J'ai alors modifier une déclaration pour y inserer une erreur (volontaire) et il ma généré l'erreur, les déclaration donnée ci-dessus sont donc correctes Le problème ne vient donc pas des déclarations, ou pas de celles-ci en tout cas

[milki1]

je suis vraiment dans le nuage la, j'ai tous verifié
dans ce cas la il faut reprendre le code, mais ca sera le meme probleme je pense!!!

mais pourquoi il reconnait pas les fonctions???

[milki1]

Merci c'est bon
c'était juste un probléme de nom, je sais pas pourquoi mais bon j'ai changer le nom du treeview et ca a marcher
salut