picturebox en parametre

Bonjour
voila j'ai "barre" qui est un string et qui contient des 0 et des 1
et un pictureBox pic
et il me fait une erreur

Citation:

---

type d'argument ByRef incompatible

---

et pourkoi donc

d'avance merci

je fais dessinCB pic, chaine

Code:

---

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

Public Function dessinCB(obj As Object, barre As String) Dim i As Integer Dim c As String * 1 Dim xpos As Long Dim Y1, Y2 As Single Dim ow As Byte Dim bw As Integer 'largeur d'une barre bw = 1 'largeur = 1 pixel     ' Dessine le code-barre dans l'objet graphique obj.ScaleMode = 3 ' dimensions en pixels obj.DrawWidth = 1 ' barres de 1 pixel de large 'obj.FontSize = 8 ' taille de la police de caractères obj.Cls ' Efface l'objet image obj.Picture = Nothing   ....   End Function

---

Tu dois déclarer ton paramètre en tant que PictureBox et non comme Object. Ça devrait marcher.

bha non :marteau:

j'ai contourné le Pb en enlevant le passage de la picturebox en paramètre

mais apres il me fait une erreur

Citation:

---

erreur 424
Un objet est requis

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

dessinCB barre End Function Public Function dessinCB(barre As String) Dim i As Integer Dim c As String * 1 Dim xpos As Long Dim Y1, Y2 As Single Dim ow As Byte Dim bw As Integer 'largeur d'une barre bw = 1 'largeur = 1 pixel ' Dessine le code-barre dans l'objet graphique Pic.ScaleMode = 3 ' dimensions en pixels

---

Citation:

---

Envoyé par LeXo

bha non :marteau:

---

Comprends pas ce que tu veux dire. Ça marche pas?

euuh j'ai refait ma réponse pour etre plus précis mais tu m'as devancer :?

arf c bon j'ai résolu mon affaire

Est-ce que Pic est déclaré dans la fonction qui appelle dessinCB ?