Fonction probleme (question de base)Résolu

Question

Bon je commence a quelque part dans mon programme jappelle:

Affiche (YO)

Jappelle la fonction (la fonction est dans un module)

Function Affiche (g As String) As String
  
Select Case (g)


  Case "YO"
  
    'fais les action que je veux que tu fase


  Case "TATA"
  
    'fais les action que je veux que tu fase

End select

L'erreur qui ce passe c'est que g est tjs = "" pkoi il ne prend pas ma valeurs que je lui passe au depart ?

Merci beaucoup

Ian

cs_DARKSIDIOUS · Accepted Answer

Ben tout d&#233;pend de ta variable YO, ah moins que tu ne veuille lui
passer la cha&#238;ne YO, et &#224; ce moment l&#224;, il faut appeler la fonction
comme ceci :


Affiche ("YO")

_____________________________________________________________________
DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en fran&#231;ais : www.ProgOtoP.com/popapi/

iian2 · Answer

Ok merci beacoup oui je lui passais en meme temps probleme resolu

J'ai une autre question

Pkoi il naime pas mon  Tvw il dit quil ne la reconnais pas

 Set nodX = frminternal.Tvw & g & .Nodes.Add(, , Str1, Str2)

cs_DARKSIDIOUS · Answer

A&#239;e, il y a plusieurs erreurs dans ton code.



D&#233;j&#224;, la proc&#233;dure Add ne renvoie rien, elle ne fait que rajouter un noeud donc ton code devient :

Call frminternal.Tvw & g & .Nodes.Add(, , Str1, Str2)



Ensuite, ton g est ill&#233;gal : il faut cr&#233;er un groupe de contr&#244;le plut&#244;t
(m&#234;me nom de contr&#244;le, mais propri&#233;t&#233; index diff&#233;rentes), et &#224; ce
moment l&#224; :

Call frminternal.Tvw(g).Nodes.Add(, , Str1, Str2)

_____________________________________________________________________
DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en fran&#231;ais : www.ProgOtoP.com/popapi/

iian2 · Answer

''D&#233;j&#224;, la proc&#233;dure Add ne renvoie rien, elle ne fait que rajouter un noeud donc ton ''code devient :
''Call frminternal.Tvw & g & .Nodes.Add(, , Str1, Str2)

POur ce qui est de mon add il va super bien inquite toi pas : - )

Au lieu de faire un index bien j'ai fais un if pour mes tvw cest plate car ca donne un code redondant

''Ensuite, ton g est ill&#233;gal : il faut cr&#233;er un groupe de contr&#244;le plut&#244;t (m&#234;me nom de ''contr&#244;le, mais propri&#233;t&#233; index diff&#233;rentes), et &#224; ce moment l&#224; :
''Call frminternal.Tvw(g).Nodes.Add(, , Str1, Str2)

Autre question:
 If Node = Strnoeud2 Then
il dit que mon Node esrt pas definiest-ce que il faut que je mette le nom de la feuille et le nom du treeview avant ?

Merci

crenaud76 · Answer

Au passage, pense a rajouter un "Option Explicit" en haut de tous tes modules (et activer l'option "Déclaration obligatoire des variables" qui le fera alors automatiquement sur tes futurs modules)
Ainsi, VB t'aurai indiqué que la varaible YO n'existait pas et tu aurais peut-être trouvé plus rapidement d'ou venait ton PB d'origine.

CR

iian2 · Answer

/auteurdetail.aspx?ID=143123 Au passage, pense a rajouter un "Option Explicit" en haut de tous tes modules (et activer l'option "D&#233;claration obligatoire des variables" qui le fera alors automatiquement sur tes futurs modules)
Ainsi, VB t'aurai indiqu&#233; que la varaible YO n'existait pas et tu aurais peut-&#234;tre trouv&#233; plus rapidement d'ou venait ton PB d'origine.

Mon probleme plus haut estais seuleemnt les "" que je navais pas mis pis mes variable son ds un module

merci

crenaud76 · Answer

Cela n'empèche pas le fait que ma remarque sur l'Option Explicit te sauvera souvent la mise si tu l'actives !!

CR

iian2 · Answer

Je linscris tjs 

:)

Fonction probleme (question de base)

8 réponses

Discussions similaires