Discussion :

[lulux80]

salut, je voudrai savoir si vous pouvais m'aider, voilà j'ai 2 problèmes :

Le premier ;

J'ai deux formulaires (clt et calcul)
Dans Clt, il y a 2zone de texte et 2combobox (Traitement et Type de pièces) que j'ai remplit en dur,
Dans Calcul, j'ai 7zones de texte, je vais les apeller : Nompièce, lar, haut, long, nb de pièce, nb de face et total.

Vous me suivez jusque là, lol , bon ok je continue...

Alors je n'arrive pas à copier ce que je sélectionne dans la combobox "Type de pièces" qui devrai lorsque j'appuies sur "OK" se mettre dans la zone de texte "Nompièce".

Mon 2ème problème ;

Selon le type de pièce que l'on choisit, les zones de texte dont je n'ai pas besoin, n'apparaisse pas. PAr exemple, pour une pièce de tôle il y a que la cellule hauteur qui n'apparaisse pas.

Merci de bien vouloir me dire quelque syntaxe si possible sinon tanpis

[BM42]

Re

Comme je te l'est déjas dit pour le ComboBox je ne peut pas t'aider
pour l'affichage de tes textBox utilise "Visible" avec une condition ex:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Recup = "Tole" then
Haut.visible = false
end if

Recup = ta selection dans ton combobox ou ta variable

Comme ma dit ZAZA la première foie que je suis venu sur le Forum :
Ne te décourrage pas ... tu vas y arriver.

A+

[sovo]

Le premier ;
Alors je n'arrive pas à copier ce que je sélectionne dans la combobox

Pour recupere le contenu d'un combobox tu fait

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   Cont = Combo1.text     'Cont est une variable que tu as declarer

Mon 2ème problème ;
Selon le type de pièce que l'on choisit, les zones de texte dont je n'ai pas besoin, n'apparaisse pas. PAr exemple, pour une pièce de tôle il y a que la cellule hauteur qui n'apparaisse pas.

je pense comme BM42

[lulux80]

Bah merci à vous deux, j'essayerai ça demain, et pour le 1er problème enfaite g réusit, je metrai la syntaxe au cs où pour les autres gens. bye

[zazaraignée]

Comme ma dit ZAZA la première foie que je suis venu sur le Forum :
Ne te décourrage pas ... tu vas y arriver.

On parle de moi ?

1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
' S'il y a une sélection de faite dans le comboBox alors
' afficher la sélection dans le TextBox
If cboTypePiece.ListIndex > -1 Then txtNomPiece.Text = cboTypePiece.Text

2) Ne sachant pas comment tu détermines qu'une pièce est en tôle ou pas...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
If <Condition> Then
    txtChamp1.Visible = False
    txtChamp2.Visible = False
    ' ...
  Else
    txtChamp1.Visible = True
    txtChamp2.Visible = True
    ' ...
End if

Si besoins de plus d'explications... tu dis

[BM42]

Salut Zaza

Et oui on parle de toi.
Tu a ete une des première à me répondre sur le forum il y a déjas quelque temps et j'avoue qu'à l'époque j'étais un peut débité, comme Lulux80.
Mais de puis je suis passé du stade de très beaucoup vachement nul à pas trops nul.(Grace a notre site Adoré !!! )

A+

[lulux80]

Alors pour la réponse à la question 1) : J'ai mis ce code ci-dessous dans le bouton OK du form soit Clt et le tour est joué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Saisie.txtnompiece.Text = Compie.List(Compie.ListIndex)

Pour la réponse à la question 2) : Je vais m'y mettre dès aujourd'hui.

@+

[lulux80]

2) Ne sachant pas comment tu détermines qu'une pièce est en tôle ou pas...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
If <Condition> Then
    txtChamp1.Visible = False
    txtChamp2.Visible = False
    ' ...
  Else
    txtChamp1.Visible = True
    txtChamp2.Visible = True
    ' ...
End if

Si besoins de plus d'explications... tu dis

Enfet c'est la pièce est soit en tôle, rond, carré (y'a différentes formes)
La syntaxe je la mets où ?
Dois-je la mettre dans la zone de texte "txtnompièce" ou dans le form_load()

Si besoins de plus d'explications... tu dis ==> Je dis

[AurelieB]

Si besoins de plus d'explications... tu dis ==> Je dis

JE! dis!