Discussion :

[andy331]

BOnjour à tous
J'ai un bouton AjoutDToolStripMenuItem lorsque je clique sur je voudrais qu'il me cache un comboBoArtiste dans un mon GroupBox1 et laisse mon autre GroupBox2 visible ensuite j'ai une requête qui m'insère le dernier artiste une table et je voudrais lui dire que lorsque la comboBox n'est pas visible qui ne tienne pas compte de la requête et cas contraire lorsqu'il est visible!!!!!

Et pour AjouterUneNouvelleOeuvreToolStripMenuItem laisse le comboBoAriste visible et cacher le GroupBox1 et lorsque je sélectionne le dernier artiste insérer dans le ComboBoxArtiste qu'il affiche GroupBox1

Merci bien de votre aide!!!!

[methylene]

BOnjour à tous
J'ai un bouton AjoutDToolStripMenuItem lorsque je clique sur je voudrais qu'il me cache un comboBoArtiste dans un mon GroupBox1 et laisse mon autre GroupBox2 visible ensuite j'ai une requête qui m'insère le dernier artiste une table et je voudrais lui dire que lorsque la comboBox n'est pas visible qui ne tienne pas compte de la requête et cas contraire lorsqu'il est visible!!!!!

Et pour AjouterUneNouvelleOeuvreToolStripMenuItem laisse le comboBoAriste visible et cacher le GroupBox1 et lorsque je sélectionne le dernier artiste insérer dans le ComboBoxArtiste qu'il affiche GroupBox1

Merci bien de votre aide!!!!

Hum et en français, ça donne quoi ? Dur de t'aider si on ne comprend pas la question ...

[nasty]

Bonjour

apres etres mort deux fois par asphyxie, je peux te repondre!

Tu peut utiliser la proprieté .visible qui affiche ou masque tes composants.

Apres, j'ai pas tout bien compris en fonction de quel criteres faut afficher ou masquer mais tu devrais reussir a suivre ton propre raisonnement.

En esperant t'avoir un peu aidé

Nasty

[methylene]

Bonjour

apres etres mort deux fois par asphyxie, je peux te repondre!

Tu peut utiliser la proprieté .visible qui affiche ou masque tes composants.

Apres, j'ai pas tout bien compris en fonction de quel criteres faut afficher ou masquer mais tu devrais reussir a suivre ton propre raisonnement.

En esperant t'avoir un peu aidé

Nasty

Franchement, félicitations, j'ai beau eu lire, relire, rerelire, lire à l'envers, lire de droite à gauche, de bas en haut, du milieu vers les extrémités, lire la tête à l'envers, mais non rien y fait, je n'ai toujours pas compris ce qu'il voulait, pourtant le titre me semblait assez clair, mais impossible de relier titre et message.

Pour Nasty ,

[andy331]

J'ai un premier formulaire (Accueil) avec un AjoutDToolStripMenuItem et AjouterUneNouvelleOeuvreToolStripMenuItem.
Lorsque je clique sur l'un dès deux j'accède à un autre formulaire (Ajouter) et ce formulaire contient un groupBox1 et GroupBox2 possède un comboBox

Un clique sur AjoutDToolStripMenuItem doit me masquer le comboBox du groupbox2 et ainsi dire à la requête se trouvant dans ce comboBox de ne pas s'exécuter lorsque le comboBox n'est pas visible et cas contraire lorsqu'il est visible.

ET un clique sur AjouterUneNouvelleOeuvreToolStripMenuItem doit masquer le GroupBox1 et laisse le comboBox du groupBox2 visible et c'est lorsque je sélectionne un élément dans celle-ci qu'elle rend visible la GrouBox1

[nasty]

Ouais bah j'ai toujours pas tout compris, mais bon!

Et le probleme est ou?

Pour masquer ta combobox :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub click_AjoutDToolStripMenuItem (byval sender as object, byval e as eventargs) handle AjoutDToolStripMenuItem.Click 'je sais meme pas si ca existe comme evenement mais bon
tacombobox.Visible = false
 
End sub
 
Private sub click_AjouterUneNouvelleOeuvreToolStripMenuItem (byval sender as object, byval e as eventargs) handles AjouterUneNouvelleOeuvreToolStripMenuItem.Click
Groupbox1.visible = false
End if
 
Private sub tacombobox_SelectedIndexChanged(byval sender as object, byval e as eventargs) handles tacombobox.SelectedIndexChanged
groupbox1.visible = true
End if

Et je vais parodier, le betisier du forum mais jetrouveunpeucondutiliserdesnomsaussilongcaembrouillelesautres! Et puis c'est dur a lire.

PS : on pourrait avoir l'intellisense parce que c'est quand meme vachement pratique quand on fait du code au feeling!

Nasty

[methylene]

En gros :

Pour masquer la GroupBox2 lors de l'appui sur AjoutDToolStripMenuItem

Code :

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

1
2
3
4
5
6
    Private Sub AjoutDToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjoutDToolStripMenuItem.Click
 
        tarequete()
        GroupBox2.Combobox.visible = False
 
    End Sub

Pour masquer la GroupBox1 lors de l'appui sur AjouterUneNouvelleOeuvreToolStripMenuItem

Code :

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

1
2
3
4
5
6
    Private Sub AjouterUneNouvelleOeuvreToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjouterUneNouvelleOeuvreToolStripMenuItem.Click
 
        Combobox.visible = False
        Comboetat = 0
 
    End Sub

Pour que ta requête s'éxecute en fonction de l'état de ta ComboBox :

Code :

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

1
2
3
4
5
6
7
8
9
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
 
        If ComboBox.Visible = True and Comboetat = 0 Then
 
            TaRequete()
 
        End If
 
    End Sub

PS : il faut également réinitialiser ton interface à un moment, avec un bouton retour par exemple en y mettant :

Code :

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

1
2
3
4
5
6
7
8
    Private Sub ButtonRetour_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonRetour.Click
 
     Comboetat = 1 
     GroupBox1.Visible = True
     GroupBox2.Visible = True
     ComboBox.Visible = True
 
    End Sub

Et n'oublie pas de déclarer dans ta class :

Code :

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

Dim Comboetat As String = 1

[methylene]

Et je vais parodier, le betisier du forum mais jetrouveunpeucondutiliserdesnomsaussilongcaembrouillelesautres! Et puis c'est dur a lire.

PS : on pourrait avoir l'intellisense parce que c'est quand meme vachement pratique quand on fait du code au feeling!

Nasty

Lmao :-)

[andy331]

Code :

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

1
2
3
4
5
6
7
Private Sub AjoutDToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjoutDToolStripMenuItem.Click
 
      // Ne reconnait pas le comboBox
        tarequete()
        GroupBox2.Combobox.visible = False
 
    End Sub

[methylene]

Oups j'ai fait une petite annerie

Code :

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

1
2
3
4
5
6
    Private Sub AjoutDToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjoutDToolStripMenuItem.Click
 
        tarequete()
        Combobox.visible = False
 
    End Sub

Code :

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

GroupBox2.Combobox.visible = False

Devient :

Code :

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

Combobox.visible = False

[andy331]

Code :

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

1
2
3
4
5
Private Sub AjoutDToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjoutDToolStripMenuItem.Click
 
        'ComboBox n'est pas reconnu mais il reconnait bien le GroupBox
 
    End Sub

Y a t-il un autre moyen de faire cela ?

[nasty]

Non tu es obligé de dire que tu passe par le parent (en l'occurrence la groupbox) pour accéder au contrôle.

Nasty

[methylene]

Ouais j'avais pas fait d'ânnerie quoi


Regarde si ta Combobox ne s'appellerait pas ComboBox1 par hasard, vu que tu l'as créé dynamiquement.

Code :

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

GroupBox1.ComboBox1.Visible = True 'ou False

PS : fin de journée ->> ânneries

[andy331]

Bonjour,
Voila mon problème que lorsque je clique sur AjoutDToolStripMenuItem il masque le ComboBox et lorsque je reviens et clique sur AjouterUneNouvelleOeuvreToolStripMenuItem reste sur le état c'est à dire que lorsque j'avais cliqué sur AjoutDToolStripMenuItem

Les deux MenuStrip ouvrent le même formulaire (FrmAjout)

Merci de votre aide

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub AjoutDToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjoutDToolStripMenuItem.Click
 
        Dim fAjout As FrmAjout
        fAjout = New FrmAjout()
        fAjout.ShowDialog()
 
        ' il doit me permettre d'ouvvrir le formulaire ajouter et de masquer le ComboBox et laissant le GroupBox ( GBoxArtiste) visible
        GBoxArtiste.Visible = True
        fAjout.CmboBoxNomArtiste.Visible = False
 
    End Sub

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub AjouterUneNouvelleOeuvreToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjouterUneNouvelleOeuvreToolStripMenuItem.Click
        Dim fAjout As FrmAjout
        fAjout = New FrmAjout()
        fAjout.ShowDialog()
 
        'il doit masquer le GroupBox(GBoxArtiste) et laissé visible le ComboBox
        Dim Comboetat as string = 0
        FrmAjout.CmboBoxNomArtiste.Visible = False
        GBoxArtiste.Visible = True
 
        Comboetat = 0
 
    End Sub

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub BttValider_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BttValider.Click
 
        Globale.Initialiser()
            'Je voudrais dire que lorsque le comboBox est masqué et ne pas agir sur la requête et lorsqu'il est visible agir sur la requête
 
            Dim Comboetat as string = 1 
 
            If CmboBoxNomArtiste.Visible = True And Comboetat = 0 Then
            'ON RECUPERE LE DERNIER CODE ARTISTE INSERER
            Dim artisteCode As Integer
            'CREATION DE LA REQUÊTE 
            Dim sqlCodeArtiste As String
            sqlCodeArtiste = "SELECT max(art_code) as codeArtiste FROM oeuvre ;"
            'LA COMMANDE
 
            Dim maCommande6 As OleDbCommand
            maCommande6 = New OleDbCommand()
            maCommande6.Connection = Globale.connexion
            maCommande6.CommandType = CommandType.Text
            maCommande6.CommandText = sqlCodeArtiste
 
            'LE DATAREADER
 
            Dim monDatareader1 As OleDbDataReader
            monDatareader1 = maCommande6.ExecuteReader()
            If ((monDatareader1.Read() = True)) Then
                artisteCode = monDatareader1("codeArtiste")
            End If
            'FERMETURE DE LA CONNECTION
            monDatareader1.Close()

[methylene]

Hablà francés ?

C'est bête, mais en lisant tes 4 premières lignes, et bien cela me décourage de lire ton code, et donc de t'aider.

Le problème c'est que on ne comprend pas ce que tu racontes, si tu pouvais reformuler.

Désolé

[nasty]

Euh! J'ai l'impression d'avoir deja repondu a cette "question" (notez les "" vu qu'il n'y a aucune vraie question dans ce topic)

Et puis ca sert a quoi ce bout de code?

Code :

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

1
2
3
4
...
            Dim Comboetat as string = 1 
            If CmboBoxNomArtiste.Visible = True And Comboetat = 0 Then
...

Y'a quelque chose entre? ou tu ne rempli jamais la seconde condition?

Nasty

[methylene]

Euh! J'ai l'impression d'avoir deja repondu a cette "question" (notez les "" vu qu'il n'y a aucune vraie question dans ce topic)

+1

[methylene]

En plus, c'est quoi ça :

Code :

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

1
2
3
        Dim fAjout As FrmAjout
        fAjout = New FrmAjout()
        fAjout.ShowDialog()

L'ensemble te ton code ressemble à des bouts de code que l'on aurait recoller pour en faire un "programme".