Function VB6 avec ByRef ou ByVal

Le
michel.arnoux
Bonjour,

J'ai défini une fonction sous VB6
Je lance l'application
Je reçois " erreur de compilation Type d'argument ByRef incompatible"

les paramêtres sont définis dans l'ordre de la même façon (string,
long, ..)
Que se passe t'il ?
Comment introduire ByVal pour ces paramêtres ?

Merci
Bonne soirée
Michel Arnoux
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Driss HANIB
Le #18645321
Bonjour michel,

je ne suis pas spécialiste mais pour ma part cela arrive :
regarde bien sur quel type de valeur cela t'indique l'erreur.
Si c'est sur une valeur de type long, vérifie bien que la variable que tu
"envoies" à la procédure est bien de type long et non pas de type integer.
Cela m'arrive car au début je mettais des variables de type integer dans
certaines focntion et je les appelle maintenant en mettant de variables de
type long..


Driss

Bonjour,

J'ai défini une fonction sous VB6
Je lance l'application
Je reçois " erreur de compilation Type d'argument ByRef incompatible"

les paramêtres sont définis dans l'ordre de la même façon (string,
long, ..)
Que se passe t'il ?
Comment introduire ByVal pour ces paramêtres ?

Merci
Bonne soirée
Michel Arnoux
Christian Hubert-Hugoud / weabow - Xtrem7
Le #18646021
Un exemple de ton code serait aidant


news:
Bonjour,

J'ai défini une fonction sous VB6
Je lance l'application
Je reçois " erreur de compilation Type d'argument ByRef incompatible"

les paramêtres sont définis dans l'ordre de la même façon (string,
long, ..)
Que se passe t'il ?
Comment introduire ByVal pour ces paramêtres ?

Merci
Bonne soirée
Michel Arnoux
lolo406
Le #18654591
Le modele pour une fonction est :
1) private function NomFonction( argument1 as type1,argument as type2) as
type3
les arguments sont par defaut passés en ByRef:
2) private function NomFonction( byref argument1 as type1,byref argument as
type2) as type3

Les exemples 1) et 2) sont equivalents
Pour changer en byval, tapez :
private function NomFonction( byval argument1 as type1,byval argument as
type2) as type3
Publicité
Poster une réponse
Anonyme