salut je fait un un petit programme je suis passer de VBA a VB6 donc il y a des truc qui change ca j'en suis sur... Mais voilas j'ai un probleme.
 
J'ai une labelbox qui ce nomme LPJ1 et je demande a une condition si cette label est vide:
 
If LPJ1.caption = "" then
 
Mais voilas vb6 me dit que LBP1. Passage d'argument non falcultatif.
 
qu'est ce qui ce passe??? j'y pige rien.
 
Et pis lors de l'installation le msdn de vb6 c'est installer donc j'ai pas d'aide sur le logiciel..
 
@ + et merci

rien compris... tu parles de LPJ1, puis LBP1... tu dis que la MSDN est installée et ensuite tu dis que tu n'as pas d'aide... sois plus clair stp

et change ton titre aussi, qui ne veut rien dire

J'ai installer VB6 Pendant l'installation la MSDN ne c'est pas installer. Donc j'ai toutes les aides possible et imaginable. quand LBP1 c'ete LPJ1 que je voulais ecrire...
 
@+

Heu d'accord  

merci pour ton aide c'est tres instructif... lol

oh mais merde enfin ! tu t'exprimes hyper mal, tu fais plein de fautes, et tout ! ne t'étonne pas si on te reprend quoi !
 
bon, sinon, pourrais tu mettre un peu plus de code que ce que tu as mis, stp ?

Private Sub CBCHOIX_Click()
Dim P As Integer
P = 1
 
If LPJ1.Item.Caption = "" And P = 1 Then
    LPJ1.Item.Caption = "X"
    LPJ2.Item.Caption = "O"
    P = 6
End If
 
If LPJ1.Item.Caption = "X" And P = 1 Then
    LPJ1.Item.Caption = "O"
    LPJ2.Item.Caption = "X"
    P = 6
End If
 
If LPJ1.Item.Caption = "O" And P = 1 Then
    LPJ1.Item.Caption = "X"
    LPJ2.Item.Caption = "O"
    P = 6
End If
End Sub

P'tain stagiaire6, apprends à t'exprimer correctement.
Chacun de tes posts est un casse-tête!
 
Juste par respect pour ceux qui vont essayer de t'aider, PRENDS LE TEMPS DE TE RELIRE!
 
Dans les 3/4 de tes posts on doit jouer aux devinettes pour comprendre ce que tu demandes.

oki je ferais gaffe maintenant
 
merci de me reprendre sur ce point on s'en rend pas forcement compte... @+

Déjà, le code que tu viens de poster est différent de celui de ta question.
 
J'ai pas VB installé ici. Je ne sais pas si le .item que tu as ajouté est nécessaire.
As-tu toujours le même message d'erreur?

oui j'ai toujour le meme message d'erreur.
 
Quand je tape "LPJ1." il aparait une liste d'object utilisable:
- Count
- Item
- LBound
- UBound
 
quand je tape "LPJ1.Item." une autre liste aparait dont le Caption dont j'ai besoin je penser que ca reglerais mon probleme mais non le probleme est toujour la.  
Quand je met pas le ".Item" c'est le ".caption" qui montrer du doigt pas VB6 avec le message d'erreur "Argument no Optional".
et si je met le ".Item" c'est alors lui qui est montree du doigt par VB6 et le message d'erreur est toujour le meme.

LPJ1 semble être un tableau.
 
Si tu tapes un point ou une parenthèse après caption, que te montre l'intellisense?

rien

desoler couper...
 
Rien deriere le ".caption" mais il me marque (integer) as label si je tape une "(" deriere le ".item"

Private Sub CBCHOIX_Click()
Dim P As Integer
P = 1
 
If LPJ1.Item(1).Caption = "" And P = 1 Then
    LPJ1.Item(1).Caption = "X"
    LPJ2.Item(1).Caption = "O"
    P = 6
End If
 
If LPJ1.Item(1).Caption = "X" And P = 1 Then
    LPJ1.Item(1).Caption = "O"
    LPJ2.Item(1).Caption = "X"
    P = 6
End If
 
If LPJ1.Item(1).Caption = "O" And P = 1 Then
    LPJ1.Item(1).Caption = "X"
    LPJ2.Item(1).Caption = "O"
    P = 6
End If
End Sub
 
mon code resemble a ca... maintenant le message d'erreur est que le 1 n'existe pas.

pffff je viens de trouver. Les objets ont un numero en plus d'avoir un nom.
 
Il faut mettre le ".item" + "(" + n°de l'objet apeller + " )" et enfin l'option voulue.
 
@+ et merci