type d'argument byref incompatible!

Question

alors la je comprend plus rien:
ds un module:
Type nbreforfait
nom As String
duree As Integer
date As Integer
temp As String
End Type
Global forfait(50) As nbreforfait

Public Sub putboard(combo As Object, tableau As nbreforfait, text As Object, enr%)

tableau(enr%).nom = combo.text
tableau(enr%).duree = text(0).text
tableau(enr%).date = text(1).text
tableau(enr%).temp = text(2).text

End Sub

ds une form :
Call putboard(Combo1, forfait, Text1, nbrenr)

donc forfait est passé en mode byref car il est modifier

et j'obtient le message d'erreur :

                    type d'argument byref incompatible
un peu d'aide ne serait pas de refus.Merci.

villissina · Answer

j'ai eu le meme probleme,
j'ai remplacé
Call putboard(Combo1, forfait, Text1, nbrenr)
par
putboard Combo1, forfait, Text1, nbrenr

et ca a marché ! Mais en fait, je sais toujours pas pourquoi

bidules · Answer

et ba pour moi ca marche toujours pas!
help me please :(

cs_TaMer · Answer

J´ai peut être un truc pour vous:
Il suffit de passer les arguments de type Numérique(Integer, Long,etc...) entre parenthèses. Dans l´exemple du bas, il faut faire passer 'forfait' et 'nbrenr' entre parenthèses, ce qui donne :

Combo1, (forfait), Text1, (nbrenr)

Cela force le type de votre variable numérique, même si l´espace mémoire alloué en est agrandi.

mcmad · Answer

g un pg avec la solution donnee ci-dessous : oui, les parametres passent bien de la procedure initiales vers la procedure appelee, mais ils ne sont pas retournee a la procedure initiales apres!!!!
en d'autre terme ca marche bien pour envoyer les param mais pas pour les recevoir!!!
qq aurait une soluce qui marche?
mcmad

mcmad · Answer

g un pg avec la solution donnee ci-dessous : oui, les parametres passent bien de la procedure initiales vers la procedure appelee, mais ils ne sont pas retournee a la procedure initiales apres!!!!
en d'autre terme ca marche bien pour envoyer les param mais pas pour les recevoir!!!
qq aurait une soluce qui marche?
mcmad

MetalTom · Answer

C'est normal vu que c'est un argument passé par référence et pas par valeur. Donc ce qui est retourné est ce que tu lui rapportes.

Moi j'ai le même message avec :
Set Dsb = Ds.CreateSoundBufferFromFile(Chemin, dsBuf)
La variable incriminée est dsbuf, un DSBUFFERDESC.

Tom

Type d'argument byref incompatible!

6 réponses

Discussions similaires