pb text box

oui c est ca !
mais le pb c est que soit c est la derniere commande qui passe soit c est la
premiere


"Jean-Marc" a écrit :

Je crois avoir compris.....

Tes boutons sont des option Button ?

Si oui, tu ne testes pas la bonne propriété.
Ce n'est pas enabled mais value, qui vaut
True si le bouton est coché
False si il n'est pas coché.

C'est ça ??


--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr

"Jean-Marc" <NO_SPAM_jean_marc_n2@yahoo.fr> a écrit dans le message de
news:43ba9726$0$31252$ba620e4c@news.skynet.be...
> Hello,
>
> si tu commençais par dire quel est le résultat que tu attends?
> N'étant pas magiciens, il est difficile de dire si le résultat
> correspond
> à ce que TU veux ou pas :-)
>
> Peux tu décrire:
> - Ce que tu attends
> - Ce qui se produit
>
> La nature de "l'erreur", si erreur il y a:
> - Le programme plante ?
> Si oui, quelle ligne et quel message d'erreur?
>
> Etc. Plus tu donneras d'informations, plus tu recevras d'aide.
>
> --
> Jean-marc
> Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
>
> "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message
de
> news:6FC0247C-B724-43F5-99A8-E4CFB347D315@microsoft.com...
> > j ai pensé a ceci :(qui ne fontionne toujours pas !)
> >
> > If Form2.Button1.Enabled = True Then
> > TextBox11.Text = "Discothèque"
> >
> > ElseIf Form2.Button2.Enabled = True Then
> > TextBox11.Text = "Bar Karaoké"
> >
> > ElseIf Form2.Button3.Enabled = True Then
> > TextBox11.Text = "Bar Ambiance Musicale"
> >
> > ElseIf Form2.Button4.Enabled = True Then
> > TextBox11.Text = "Bar de nuit"
> >
> > ElseIf Form2.Button5.Enabled = True Then
> > TextBox11.Text = "Club"
> >
> > ElseIf Form2.Button6.Enabled = True Then
> > TextBox11.Text = "Cabaret"
> >
> > ElseIf Form2.Button7.Enabled = True Then
> > TextBox11.Text = "casino"
> >
> > ElseIf Form2.Button8.Enabled = True Then
> > TextBox11.Text = "booling"
> >
> > ElseIf Form2.Button9.Enabled = True Then
> > TextBox11.Text = "Immeuble a risques agravants"
> >
> > End If
> >
> > je ne vois vraiment pas pourquoi ca ne fonctionne pas !
> >
> > help me please !
> >
> >
> >
> >
> > "Christian Hugoud" a écrit :
> >
> > > Parce que If Form2.Button9.Enabled = True Then est toujours
> executé.
> > >
> > > Si tu veux sortir de la procédure dès qu'une condition est vraie,
> alors
> > > ajoute à chaque fois avant le end if : exit sub
> > >
> > > Christian
> > >
> > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le
> message de
> > > news: 4A27E828-BA7C-46DC-978A-3C9309BBC693@microsoft.com...
> > > > bonjour a tous!
> > > > voici mon pb: je ne sais pas pourquoi ca ne fonctionne pas
> > > > voici mon code :
> > > > Private Sub TextBox11_Click(ByVal sender As Object, ByVal e As
> > > > System.EventArgs) Handles TextBox11.Click
> > > > If Form2.Button1.Enabled = True Then
> > > > TextBox11.Text = "Discothèque"
> > > > End If
> > > >
> > > > If Form2.Button2.Enabled = True Then
> > > > TextBox11.Text = "Bar Karaoké"
> > > > End If
> > > >
> > > > If Form2.Button3.Enabled = True Then
> > > > TextBox11.Text = "Bar Ambiance Musicale"
> > > > End If
> > > >
> > > > If Form2.Button4.Enabled = True Then
> > > > TextBox11.Text = "Bar de nuit"
> > > > End If
> > > > If Form2.Button5.Enabled = True Then
> > > > TextBox11.Text = "Club"
> > > > End If
> > > > If Form2.Button6.Enabled = True Then
> > > > TextBox11.Text = "Cabaret"
> > > > End If
> > > > If Form2.Button7.Enabled = True Then
> > > > TextBox11.Text = "casino"
> > > > End If
> > > > If Form2.Button8.Enabled = True Then
> > > > TextBox11.Text = "booling"
> > > > End If
> > > >
> > > > If Form2.Button9.Enabled = True Then
> > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > End If
> > > > et le souci c est qu il m ecrit a chaque fois "immeuble a risque
> agravant
> > > > il ne prend pas en compte les autre phrase a ecrire !
> > > >
> > > > si quelqu un pouvait m aider svp !
> > > > merci d avance
> > >
> > >
> > >
>

Alors c'est tout simple.

Il suffit de tester la bonne propriété (Value) et pas Enabled.

Le code devient

if buton1.value= True then
Text11.text = "truc"
else if button2.value = True then
text11.text = "bidule"
etc.

Ca marche car les bontons donvent s'excelure les uns les autres,
c'est à dire qu'à un instant t, un seul à sa propriété Value à TRUE,
tous les autres sont à false.

Note qu'en général on utilise un groupe de controle pour les boutons
options, justement pour s'assurer de l'exclusion mutuelle.

Voir l'aide si tu ne connais pas les groupes de controle.


--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr

"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:D378D5B2-F436-4E0C-89C7-3F060EF1A839@microsoft.com...

oui c est ca !
mais le pb c est que soit c est la derniere commande qui passe soit c

est la

premiere


"Jean-Marc" a écrit :

> Je crois avoir compris.....
>
> Tes boutons sont des option Button ?
>
> Si oui, tu ne testes pas la bonne propriété.
> Ce n'est pas enabled mais value, qui vaut
> True si le bouton est coché
> False si il n'est pas coché.
>
> C'est ça ??
>
>
> --
> Jean-marc
> Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
>
> "Jean-Marc" <NO_SPAM_jean_marc_n2@yahoo.fr> a écrit dans le message

de

> news:43ba9726$0$31252$ba620e4c@news.skynet.be...
> > Hello,
> >
> > si tu commençais par dire quel est le résultat que tu attends?
> > N'étant pas magiciens, il est difficile de dire si le résultat
> > correspond
> > à ce que TU veux ou pas :-)
> >
> > Peux tu décrire:
> > - Ce que tu attends
> > - Ce qui se produit
> >
> > La nature de "l'erreur", si erreur il y a:
> > - Le programme plante ?
> > Si oui, quelle ligne et quel message d'erreur?
> >
> > Etc. Plus tu donneras d'informations, plus tu recevras d'aide.
> >
> > --
> > Jean-marc
> > Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> > "There are only 10 kind of people
> > those who understand binary and those who don't."
> > mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
> >
> > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le

message

> de
> > news:6FC0247C-B724-43F5-99A8-E4CFB347D315@microsoft.com...
> > > j ai pensé a ceci :(qui ne fontionne toujours pas !)
> > >
> > > If Form2.Button1.Enabled = True Then
> > > TextBox11.Text = "Discothèque"
> > >
> > > ElseIf Form2.Button2.Enabled = True Then
> > > TextBox11.Text = "Bar Karaoké"
> > >
> > > ElseIf Form2.Button3.Enabled = True Then
> > > TextBox11.Text = "Bar Ambiance Musicale"
> > >
> > > ElseIf Form2.Button4.Enabled = True Then
> > > TextBox11.Text = "Bar de nuit"
> > >
> > > ElseIf Form2.Button5.Enabled = True Then
> > > TextBox11.Text = "Club"
> > >
> > > ElseIf Form2.Button6.Enabled = True Then
> > > TextBox11.Text = "Cabaret"
> > >
> > > ElseIf Form2.Button7.Enabled = True Then
> > > TextBox11.Text = "casino"
> > >
> > > ElseIf Form2.Button8.Enabled = True Then
> > > TextBox11.Text = "booling"
> > >
> > > ElseIf Form2.Button9.Enabled = True Then
> > > TextBox11.Text = "Immeuble a risques agravants"
> > >
> > > End If
> > >
> > > je ne vois vraiment pas pourquoi ca ne fonctionne pas !
> > >
> > > help me please !
> > >
> > >
> > >
> > >
> > > "Christian Hugoud" a écrit :
> > >
> > > > Parce que If Form2.Button9.Enabled = True Then est toujours
> > executé.
> > > >
> > > > Si tu veux sortir de la procédure dès qu'une condition est

vraie,

> > alors
> > > > ajoute à chaque fois avant le end if : exit sub
> > > >
> > > > Christian
> > > >
> > > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le
> > message de
> > > > news: 4A27E828-BA7C-46DC-978A-3C9309BBC693@microsoft.com...
> > > > > bonjour a tous!
> > > > > voici mon pb: je ne sais pas pourquoi ca ne fonctionne pas
> > > > > voici mon code :
> > > > > Private Sub TextBox11_Click(ByVal sender As Object, ByVal e

As

> > > > > System.EventArgs) Handles TextBox11.Click
> > > > > If Form2.Button1.Enabled = True Then
> > > > > TextBox11.Text = "Discothèque"
> > > > > End If
> > > > >
> > > > > If Form2.Button2.Enabled = True Then
> > > > > TextBox11.Text = "Bar Karaoké"
> > > > > End If
> > > > >
> > > > > If Form2.Button3.Enabled = True Then
> > > > > TextBox11.Text = "Bar Ambiance Musicale"
> > > > > End If
> > > > >
> > > > > If Form2.Button4.Enabled = True Then
> > > > > TextBox11.Text = "Bar de nuit"
> > > > > End If
> > > > > If Form2.Button5.Enabled = True Then
> > > > > TextBox11.Text = "Club"
> > > > > End If
> > > > > If Form2.Button6.Enabled = True Then
> > > > > TextBox11.Text = "Cabaret"
> > > > > End If
> > > > > If Form2.Button7.Enabled = True Then
> > > > > TextBox11.Text = "casino"
> > > > > End If
> > > > > If Form2.Button8.Enabled = True Then
> > > > > TextBox11.Text = "booling"
> > > > > End If
> > > > >
> > > > > If Form2.Button9.Enabled = True Then
> > > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > > End If
> > > > > et le souci c est qu il m ecrit a chaque fois "immeuble a

risque

> > agravant
> > > > > il ne prend pas en compte les autre phrase a ecrire !
> > > > >
> > > > > si quelqu un pouvait m aider svp !
> > > > > merci d avance
> > > >
> > > >
> > > >
> >
>
>

il me met ceci comme erreur :
'value' is not a member of 'System.Windows.Forms.Button'.


"Jean-Marc" a écrit :

Alors c'est tout simple.

Il suffit de tester la bonne propriété (Value) et pas Enabled.

Le code devient

if buton1.value= True then
Text11.text = "truc"
else if button2.value = True then
text11.text = "bidule"
etc.

Ca marche car les bontons donvent s'excelure les uns les autres,
c'est à dire qu'à un instant t, un seul à sa propriété Value à TRUE,
tous les autres sont à false.

Note qu'en général on utilise un groupe de controle pour les boutons
options, justement pour s'assurer de l'exclusion mutuelle.

Voir l'aide si tu ne connais pas les groupes de controle.


--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr

"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:D378D5B2-F436-4E0C-89C7-3F060EF1A839@microsoft.com...
> oui c est ca !
> mais le pb c est que soit c est la derniere commande qui passe soit c
est la
> premiere
>
>
> "Jean-Marc" a écrit :
>
> > Je crois avoir compris.....
> >
> > Tes boutons sont des option Button ?
> >
> > Si oui, tu ne testes pas la bonne propriété.
> > Ce n'est pas enabled mais value, qui vaut
> > True si le bouton est coché
> > False si il n'est pas coché.
> >
> > C'est ça ??
> >
> >
> > --
> > Jean-marc
> > Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> > "There are only 10 kind of people
> > those who understand binary and those who don't."
> > mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
> >
> > "Jean-Marc" <NO_SPAM_jean_marc_n2@yahoo.fr> a écrit dans le message
de
> > news:43ba9726$0$31252$ba620e4c@news.skynet.be...
> > > Hello,
> > >
> > > si tu commençais par dire quel est le résultat que tu attends?
> > > N'étant pas magiciens, il est difficile de dire si le résultat
> > > correspond
> > > à ce que TU veux ou pas :-)
> > >
> > > Peux tu décrire:
> > > - Ce que tu attends
> > > - Ce qui se produit
> > >
> > > La nature de "l'erreur", si erreur il y a:
> > > - Le programme plante ?
> > > Si oui, quelle ligne et quel message d'erreur?
> > >
> > > Etc. Plus tu donneras d'informations, plus tu recevras d'aide.
> > >
> > > --
> > > Jean-marc
> > > Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> > > "There are only 10 kind of people
> > > those who understand binary and those who don't."
> > > mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
> > >
> > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le
message
> > de
> > > news:6FC0247C-B724-43F5-99A8-E4CFB347D315@microsoft.com...
> > > > j ai pensé a ceci :(qui ne fontionne toujours pas !)
> > > >
> > > > If Form2.Button1.Enabled = True Then
> > > > TextBox11.Text = "Discothèque"
> > > >
> > > > ElseIf Form2.Button2.Enabled = True Then
> > > > TextBox11.Text = "Bar Karaoké"
> > > >
> > > > ElseIf Form2.Button3.Enabled = True Then
> > > > TextBox11.Text = "Bar Ambiance Musicale"
> > > >
> > > > ElseIf Form2.Button4.Enabled = True Then
> > > > TextBox11.Text = "Bar de nuit"
> > > >
> > > > ElseIf Form2.Button5.Enabled = True Then
> > > > TextBox11.Text = "Club"
> > > >
> > > > ElseIf Form2.Button6.Enabled = True Then
> > > > TextBox11.Text = "Cabaret"
> > > >
> > > > ElseIf Form2.Button7.Enabled = True Then
> > > > TextBox11.Text = "casino"
> > > >
> > > > ElseIf Form2.Button8.Enabled = True Then
> > > > TextBox11.Text = "booling"
> > > >
> > > > ElseIf Form2.Button9.Enabled = True Then
> > > > TextBox11.Text = "Immeuble a risques agravants"
> > > >
> > > > End If
> > > >
> > > > je ne vois vraiment pas pourquoi ca ne fonctionne pas !
> > > >
> > > > help me please !
> > > >
> > > >
> > > >
> > > >
> > > > "Christian Hugoud" a écrit :
> > > >
> > > > > Parce que If Form2.Button9.Enabled = True Then est toujours
> > > executé.
> > > > >
> > > > > Si tu veux sortir de la procédure dès qu'une condition est
vraie,
> > > alors
> > > > > ajoute à chaque fois avant le end if : exit sub
> > > > >
> > > > > Christian
> > > > >
> > > > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le
> > > message de
> > > > > news: 4A27E828-BA7C-46DC-978A-3C9309BBC693@microsoft.com...
> > > > > > bonjour a tous!
> > > > > > voici mon pb: je ne sais pas pourquoi ca ne fonctionne pas
> > > > > > voici mon code :
> > > > > > Private Sub TextBox11_Click(ByVal sender As Object, ByVal e
As
> > > > > > System.EventArgs) Handles TextBox11.Click
> > > > > > If Form2.Button1.Enabled = True Then
> > > > > > TextBox11.Text = "Discothèque"
> > > > > > End If
> > > > > >
> > > > > > If Form2.Button2.Enabled = True Then
> > > > > > TextBox11.Text = "Bar Karaoké"
> > > > > > End If
> > > > > >
> > > > > > If Form2.Button3.Enabled = True Then
> > > > > > TextBox11.Text = "Bar Ambiance Musicale"
> > > > > > End If
> > > > > >
> > > > > > If Form2.Button4.Enabled = True Then
> > > > > > TextBox11.Text = "Bar de nuit"
> > > > > > End If
> > > > > > If Form2.Button5.Enabled = True Then
> > > > > > TextBox11.Text = "Club"
> > > > > > End If
> > > > > > If Form2.Button6.Enabled = True Then
> > > > > > TextBox11.Text = "Cabaret"
> > > > > > End If
> > > > > > If Form2.Button7.Enabled = True Then
> > > > > > TextBox11.Text = "casino"
> > > > > > End If
> > > > > > If Form2.Button8.Enabled = True Then
> > > > > > TextBox11.Text = "booling"
> > > > > > End If
> > > > > >
> > > > > > If Form2.Button9.Enabled = True Then
> > > > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > > > End If
> > > > > > et le souci c est qu il m ecrit a chaque fois "immeuble a
risque
> > > agravant
> > > > > > il ne prend pas en compte les autre phrase a ecrire !
> > > > > >
> > > > > > si quelqu un pouvait m aider svp !
> > > > > > merci d avance
> > > > >
> > > > >
> > > > >
> > >
> >
> >

en fait c'est sur le clic de l'option button qu'il faut mettre ton action;

Donc dans
Private Sub Button1_Click()
TextBox11.Text = "Discothèque"
End Sub
Private Sub Button2_Click()
TextBox11.Text = "Bar Karaoké"
End Sub
Private Sub Button3_Click()
TextBox11.Text = "Bar Ambiance Musicale"
End Sub
Private Sub Button4_Click()
TextBox11.Text = "Bar de nuit"
End Sub
Private Sub Button5_Click()
TextBox11.Text = "Club"
End Sub
Private Sub Button6_Click()
TextBox11.Text = "Cabaret"
End Sub
Private Sub Button7_Click()
TextBox11.Text = "casino"
End Sub
Private Sub Button8_Click()
TextBox11.Text = "booling"
End Sub
Private Sub Button9_Click()
TextBox11.Text = "Immeuble a risques agravants"
End Sub


Maintenant tu aurais beaucoup plus intérêt à créer un groupe de bouttons

Donc dans ta forme, tu crées un optionButton qui porteras l'index 0
Tu copies ce contrôle 8 fois, ils porteront les index 0 à 8.
Tu entres un textbox Text1
Tu crées une variable privée de la forme MesChoix as Variant

Voici le résultat en code :

Option Explicit

Private MesChoix() As Variant



Private Sub Form_Load()
MesChoix = Array("Discothèque", "Bar Karaoké", "Bar Ambiance Musicale",
"Bar de nuit", "Club", "Cabaret", "casino", "booling", "Immeuble a risques
agravants")
End Sub

Private Sub Option1_Click(Index As Integer)
Text1 = MesChoix(Index)
End Sub








"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news: EFDD0058-A135-4B87-A4A1-8A2AA97ED0F1@microsoft.com...

le souci est que a chaque fois que je clique sur un bouton(n importe
lequel)
il m ecrit dans la textbox "immeuble a risque agravant" si je ne met pas
les
"else if"
si je le met il me met que "discotheque"

"Jean-Marc" a écrit :

Hello,

si tu commençais par dire quel est le résultat que tu attends?
N'étant pas magiciens, il est difficile de dire si le résultat
correspond
à ce que TU veux ou pas :-)

Peux tu décrire:
- Ce que tu attends
- Ce qui se produit

La nature de "l'erreur", si erreur il y a:
- Le programme plante ?
Si oui, quelle ligne et quel message d'erreur?

Etc. Plus tu donneras d'informations, plus tu recevras d'aide.

--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr

"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:6FC0247C-B724-43F5-99A8-E4CFB347D315@microsoft.com...
> j ai pensé a ceci :(qui ne fontionne toujours pas !)
>
> If Form2.Button1.Enabled = True Then
> TextBox11.Text = "Discothèque"
>
> ElseIf Form2.Button2.Enabled = True Then
> TextBox11.Text = "Bar Karaoké"
>
> ElseIf Form2.Button3.Enabled = True Then
> TextBox11.Text = "Bar Ambiance Musicale"
>
> ElseIf Form2.Button4.Enabled = True Then
> TextBox11.Text = "Bar de nuit"
>
> ElseIf Form2.Button5.Enabled = True Then
> TextBox11.Text = "Club"
>
> ElseIf Form2.Button6.Enabled = True Then
> TextBox11.Text = "Cabaret"
>
> ElseIf Form2.Button7.Enabled = True Then
> TextBox11.Text = "casino"
>
> ElseIf Form2.Button8.Enabled = True Then
> TextBox11.Text = "booling"
>
> ElseIf Form2.Button9.Enabled = True Then
> TextBox11.Text = "Immeuble a risques agravants"
>
> End If
>
> je ne vois vraiment pas pourquoi ca ne fonctionne pas !
>
> help me please !
>
>
>
>
> "Christian Hugoud" a écrit :
>
> > Parce que If Form2.Button9.Enabled = True Then est toujours
executé.
> >
> > Si tu veux sortir de la procédure dès qu'une condition est vraie,
alors
> > ajoute à chaque fois avant le end if : exit sub
> >
> > Christian
> >
> > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le
message de
> > news: 4A27E828-BA7C-46DC-978A-3C9309BBC693@microsoft.com...
> > > bonjour a tous!
> > > voici mon pb: je ne sais pas pourquoi ca ne fonctionne pas
> > > voici mon code :
> > > Private Sub TextBox11_Click(ByVal sender As Object, ByVal e As
> > > System.EventArgs) Handles TextBox11.Click
> > > If Form2.Button1.Enabled = True Then
> > > TextBox11.Text = "Discothèque"
> > > End If
> > >
> > > If Form2.Button2.Enabled = True Then
> > > TextBox11.Text = "Bar Karaoké"
> > > End If
> > >
> > > If Form2.Button3.Enabled = True Then
> > > TextBox11.Text = "Bar Ambiance Musicale"
> > > End If
> > >
> > > If Form2.Button4.Enabled = True Then
> > > TextBox11.Text = "Bar de nuit"
> > > End If
> > > If Form2.Button5.Enabled = True Then
> > > TextBox11.Text = "Club"
> > > End If
> > > If Form2.Button6.Enabled = True Then
> > > TextBox11.Text = "Cabaret"
> > > End If
> > > If Form2.Button7.Enabled = True Then
> > > TextBox11.Text = "casino"
> > > End If
> > > If Form2.Button8.Enabled = True Then
> > > TextBox11.Text = "booling"
> > > End If
> > >
> > > If Form2.Button9.Enabled = True Then
> > > TextBox11.Text = "Immeuble a risques agravants"
> > > End If
> > > et le souci c est qu il m ecrit a chaque fois "immeuble a risque
agravant
> > > il ne prend pas en compte les autre phrase a ecrire !
> > >
> > > si quelqu un pouvait m aider svp !
> > > merci d avance
> >
> >
> >

HeLioZz a écrit :

il me met ceci comme erreur :
'value' is not a member of 'System.Windows.Forms.Button'.

Bon, alors d'une part, tu est sous VB.Net, donc les réponses données ici
pour VB6 ne seront pas forcement adaptées. On t'a déjà conseillé d'aller
faire un tour sur le forum dédié à VB.Net.

D'autre part, tu sembles utiliser des 'System.Windows.Forms.Button' pour
faire de l'exclusion mutuelle, alors que pour cette fonction on aurait
plutot tendance à utiliser des 'System.Windows.Forms.RadioButton'. Si tu
tiens à utiliser des 'Button', c'est à toui d'implementer tout ce qui
est déja fait pour les 'RadioButton'. A toi de voir si cela vaut le coup.

Vincent Guichard

Dans : news:OlIX$iIEGHA.3004@TK2MSFTNGP15.phx.gbl,
Patrice Henrio disait :

Maintenant tu aurais beaucoup plus intérêt à créer un groupe de
bouttons

Bonsoir Patrice,

Le souci, c'est qu'il est en vb.NET et cela ne fonctionne pas ainsi.
Si on veut manipuler des tableaux, il faut les faire soit-même.


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT