Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic pb textbox

pb textbox

14 réponses
Avatar
HeLioZz
bonjour a tous !
voila je suis bien embeté pour mon programme!
j ai essayé plusieur facon et ca ne fonctionne pas comme je l espere
voici le code :
If Form2.Button1.Enabled = True Then
TextBox11.Text = "Discothèque"
TextBox11.Enabled = False
ElseIf Form2.Button2.Enabled = True Then
TextBox11.Text = "Bar Karaoké"
TextBox11.Enabled = False
ElseIf Form2.Button3.Enabled = True Then
TextBox11.Text = "Bar d'Ambiance Musicale"
TextBox11.Enabled = False
ElseIf Form2.Button4.Enabled = True Then
TextBox11.Text = "Bar de nuit"
TextBox11.Enabled = False
ElseIf Form2.Button5.Enabled = True Then
TextBox11.Text = "Club"
TextBox11.Enabled = False
ElseIf Form2.Button6.Enabled = True Then
TextBox11.Text = "Cabaret"
TextBox11.Enabled = False
ElseIf Form2.Button7.Enabled = True Then
TextBox11.Text = "casino"
TextBox11.Enabled = False
ElseIf Form2.Button8.Enabled = True Then
TextBox11.Text = "bowling"
TextBox11.Enabled = False
ElseIf Form2.Button9.Enabled = True Then
TextBox11.Text = "Immeuble a risques agravants"
TextBox11.Enabled = False
End If

le souci est que je peux cliquer sur n importe quel bouton ca m ecris dans
ma textbox a chaque fois"discotheque".
cela fait plusieurs jours que je suis sur ce pb!
si quelqu un pouvait m aider svp ce serait super sympa

merci d avance
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
Patrice
Enabled indique si le bouton est "cliquable" ou non (activé) et non pas si
il est effectivement cliqué ou non. Je pense que tu cherches plutôt
l'évènement Click (en français) :
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp

--
Patrice

"HeLioZz" a écrit dans le message de
news:
bonjour a tous !
voila je suis bien embeté pour mon programme!
j ai essayé plusieur facon et ca ne fonctionne pas comme je l espere
voici le code :
If Form2.Button1.Enabled = True Then
TextBox11.Text = "Discothèque"
TextBox11.Enabled = False
ElseIf Form2.Button2.Enabled = True Then
TextBox11.Text = "Bar Karaoké"
TextBox11.Enabled = False
ElseIf Form2.Button3.Enabled = True Then
TextBox11.Text = "Bar d'Ambiance Musicale"
TextBox11.Enabled = False
ElseIf Form2.Button4.Enabled = True Then
TextBox11.Text = "Bar de nuit"
TextBox11.Enabled = False
ElseIf Form2.Button5.Enabled = True Then
TextBox11.Text = "Club"
TextBox11.Enabled = False
ElseIf Form2.Button6.Enabled = True Then
TextBox11.Text = "Cabaret"
TextBox11.Enabled = False
ElseIf Form2.Button7.Enabled = True Then
TextBox11.Text = "casino"
TextBox11.Enabled = False
ElseIf Form2.Button8.Enabled = True Then
TextBox11.Text = "bowling"
TextBox11.Enabled = False
ElseIf Form2.Button9.Enabled = True Then
TextBox11.Text = "Immeuble a risques agravants"
TextBox11.Enabled = False
End If

le souci est que je peux cliquer sur n importe quel bouton ca m ecris dans
ma textbox a chaque fois"discotheque".
cela fait plusieurs jours que je suis sur ce pb!
si quelqu un pouvait m aider svp ce serait super sympa

merci d avance


Avatar
Guillaume Davion
Button.Enabled n'a jamais permi de savoir quel bouton est cliqué, ca
permet simplement de savoir s'il est actif ou pas.
Il faut gèrer l'évement onClick des boutons pour faire votre action.
Avatar
HeLioZz
merci de cette info !
mais le souci est que la commande click ne fonctionne pas !
pourriez vous m aider en me donnant un exple de syntaxe ?
merci


"Patrice" a écrit :

Enabled indique si le bouton est "cliquable" ou non (activé) et non pas si
il est effectivement cliqué ou non. Je pense que tu cherches plutôt
l'évènement Click (en français) :
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp

--
Patrice

"HeLioZz" a écrit dans le message de
news:
> bonjour a tous !
> voila je suis bien embeté pour mon programme!
> j ai essayé plusieur facon et ca ne fonctionne pas comme je l espere
> voici le code :
> If Form2.Button1.Enabled = True Then
> TextBox11.Text = "Discothèque"
> TextBox11.Enabled = False
> ElseIf Form2.Button2.Enabled = True Then
> TextBox11.Text = "Bar Karaoké"
> TextBox11.Enabled = False
> ElseIf Form2.Button3.Enabled = True Then
> TextBox11.Text = "Bar d'Ambiance Musicale"
> TextBox11.Enabled = False
> ElseIf Form2.Button4.Enabled = True Then
> TextBox11.Text = "Bar de nuit"
> TextBox11.Enabled = False
> ElseIf Form2.Button5.Enabled = True Then
> TextBox11.Text = "Club"
> TextBox11.Enabled = False
> ElseIf Form2.Button6.Enabled = True Then
> TextBox11.Text = "Cabaret"
> TextBox11.Enabled = False
> ElseIf Form2.Button7.Enabled = True Then
> TextBox11.Text = "casino"
> TextBox11.Enabled = False
> ElseIf Form2.Button8.Enabled = True Then
> TextBox11.Text = "bowling"
> TextBox11.Enabled = False
> ElseIf Form2.Button9.Enabled = True Then
> TextBox11.Text = "Immeuble a risques agravants"
> TextBox11.Enabled = False
> End If
>
> le souci est que je peux cliquer sur n importe quel bouton ca m ecris dans
> ma textbox a chaque fois"discotheque".
> cela fait plusieurs jours que je suis sur ce pb!
> si quelqu un pouvait m aider svp ce serait super sympa
>
> merci d avance





Avatar
Patrice
Toujours indiquer ce qui est fait et le message exact rencontré.

Par exemple, cela pourrait donner :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
MsgBox("Cliqué !")
End Sub

(avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
s'affichera lorsque le bouton est cliqué.

Si tu es un débutant intégral essaie des initiations comme
http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
--
Patrice

"HeLioZz" a écrit dans le message de
news:
merci de cette info !
mais le souci est que la commande click ne fonctionne pas !
pourriez vous m aider en me donnant un exple de syntaxe ?
merci


"Patrice" a écrit :

> Enabled indique si le bouton est "cliquable" ou non (activé) et non pas


si
> il est effectivement cliqué ou non. Je pense que tu cherches plutôt
> l'évènement Click (en français) :
>


http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
>
> --
> Patrice
>
> "HeLioZz" a écrit dans le message de
> news:
> > bonjour a tous !
> > voila je suis bien embeté pour mon programme!
> > j ai essayé plusieur facon et ca ne fonctionne pas comme je l espere
> > voici le code :
> > If Form2.Button1.Enabled = True Then
> > TextBox11.Text = "Discothèque"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button2.Enabled = True Then
> > TextBox11.Text = "Bar Karaoké"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button3.Enabled = True Then
> > TextBox11.Text = "Bar d'Ambiance Musicale"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button4.Enabled = True Then
> > TextBox11.Text = "Bar de nuit"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button5.Enabled = True Then
> > TextBox11.Text = "Club"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button6.Enabled = True Then
> > TextBox11.Text = "Cabaret"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button7.Enabled = True Then
> > TextBox11.Text = "casino"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button8.Enabled = True Then
> > TextBox11.Text = "bowling"
> > TextBox11.Enabled = False
> > ElseIf Form2.Button9.Enabled = True Then
> > TextBox11.Text = "Immeuble a risques agravants"
> > TextBox11.Enabled = False
> > End If
> >
> > le souci est que je peux cliquer sur n importe quel bouton ca m ecris


dans
> > ma textbox a chaque fois"discotheque".
> > cela fait plusieurs jours que je suis sur ce pb!
> > si quelqu un pouvait m aider svp ce serait super sympa
> >
> > merci d avance
>
>
>


Avatar
HeLioZz
pour la syntaxe du privat sub je n ai pas de souci !
mais j aurai un pb pour la syntaxe de la commande click
pourriez vous me donner un exemple de syntaxe de button.click SVP
merci d avance!

"Patrice" a écrit :

Toujours indiquer ce qui est fait et le message exact rencontré.

Par exemple, cela pourrait donner :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
MsgBox("Cliqué !")
End Sub

(avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
s'affichera lorsque le bouton est cliqué.

Si tu es un débutant intégral essaie des initiations comme
http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
--
Patrice

"HeLioZz" a écrit dans le message de
news:
> merci de cette info !
> mais le souci est que la commande click ne fonctionne pas !
> pourriez vous m aider en me donnant un exple de syntaxe ?
> merci
>
>
> "Patrice" a écrit :
>
> > Enabled indique si le bouton est "cliquable" ou non (activé) et non pas
si
> > il est effectivement cliqué ou non. Je pense que tu cherches plutôt
> > l'évènement Click (en français) :
> >
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> >
> > --
> > Patrice
> >
> > "HeLioZz" a écrit dans le message de
> > news:
> > > bonjour a tous !
> > > voila je suis bien embeté pour mon programme!
> > > j ai essayé plusieur facon et ca ne fonctionne pas comme je l espere
> > > voici le code :
> > > If Form2.Button1.Enabled = True Then
> > > TextBox11.Text = "Discothèque"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button2.Enabled = True Then
> > > TextBox11.Text = "Bar Karaoké"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button3.Enabled = True Then
> > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button4.Enabled = True Then
> > > TextBox11.Text = "Bar de nuit"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button5.Enabled = True Then
> > > TextBox11.Text = "Club"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button6.Enabled = True Then
> > > TextBox11.Text = "Cabaret"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button7.Enabled = True Then
> > > TextBox11.Text = "casino"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button8.Enabled = True Then
> > > TextBox11.Text = "bowling"
> > > TextBox11.Enabled = False
> > > ElseIf Form2.Button9.Enabled = True Then
> > > TextBox11.Text = "Immeuble a risques agravants"
> > > TextBox11.Enabled = False
> > > End If
> > >
> > > le souci est que je peux cliquer sur n importe quel bouton ca m ecris
dans
> > > ma textbox a chaque fois"discotheque".
> > > cela fait plusieurs jours que je suis sur ce pb!
> > > si quelqu un pouvait m aider svp ce serait super sympa
> > >
> > > merci d avance
> >
> >
> >





Avatar
Patrice
Je ne comprends pas le problème. Cette procédure permet de gérer l'évènement
click. Donc pour cela tu es ok ? Je ne vois pas ce que tu veux dire par ton
problème de syntaxe avec la "commande click" (? c'est quoi une procédure,
une fonction, qui fait quoi ?).

Ce n'est pas à toi d'appeler cette procédure si c'est ce que tu essaies de
faire. Windows le fait lorsque le bouton est pressé (c'est ce qu'indique le
"Handles Button1.Click").

--
Patrice

"HeLioZz" a écrit dans le message de
news:
pour la syntaxe du privat sub je n ai pas de souci !
mais j aurai un pb pour la syntaxe de la commande click
pourriez vous me donner un exemple de syntaxe de button.click SVP
merci d avance!

"Patrice" a écrit :

> Toujours indiquer ce qui est fait et le message exact rencontré.
>
> Par exemple, cela pourrait donner :
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles Button1.Click
> MsgBox("Cliqué !")
> End Sub
>
> (avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
> s'affichera lorsque le bouton est cliqué.
>
> Si tu es un débutant intégral essaie des initiations comme
> http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
> --
> Patrice
>
> "HeLioZz" a écrit dans le message de
> news:
> > merci de cette info !
> > mais le souci est que la commande click ne fonctionne pas !
> > pourriez vous m aider en me donnant un exple de syntaxe ?
> > merci
> >
> >
> > "Patrice" a écrit :
> >
> > > Enabled indique si le bouton est "cliquable" ou non (activé) et non


pas
> si
> > > il est effectivement cliqué ou non. Je pense que tu cherches plutôt
> > > l'évènement Click (en français) :
> > >
>


http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> > >
> > > --
> > > Patrice
> > >
> > > "HeLioZz" a écrit dans le


message de
> > > news:
> > > > bonjour a tous !
> > > > voila je suis bien embeté pour mon programme!
> > > > j ai essayé plusieur facon et ca ne fonctionne pas comme je l


espere
> > > > voici le code :
> > > > If Form2.Button1.Enabled = True Then
> > > > TextBox11.Text = "Discothèque"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button2.Enabled = True Then
> > > > TextBox11.Text = "Bar Karaoké"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button3.Enabled = True Then
> > > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button4.Enabled = True Then
> > > > TextBox11.Text = "Bar de nuit"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button5.Enabled = True Then
> > > > TextBox11.Text = "Club"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button6.Enabled = True Then
> > > > TextBox11.Text = "Cabaret"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button7.Enabled = True Then
> > > > TextBox11.Text = "casino"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button8.Enabled = True Then
> > > > TextBox11.Text = "bowling"
> > > > TextBox11.Enabled = False
> > > > ElseIf Form2.Button9.Enabled = True Then
> > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > TextBox11.Enabled = False
> > > > End If
> > > >
> > > > le souci est que je peux cliquer sur n importe quel bouton ca m


ecris
> dans
> > > > ma textbox a chaque fois"discotheque".
> > > > cela fait plusieurs jours que je suis sur ce pb!
> > > > si quelqu un pouvait m aider svp ce serait super sympa
> > > >
> > > > merci d avance
> > >
> > >
> > >
>
>
>


Avatar
HeLioZz
ma syntaxe etais

if button1.enabled=true
textbox1.text="exemple"
end if

hors on m a dit qu il fallait faire cette commande avec "click" a la place
de "enabled"
le souci est que j ai essayé de faire avec ce fameux click mais je n arrive
pas a trouver la bonne syntaxe!
si vous avez une petite idée merci de m en faire part...


"Patrice" a écrit :

Je ne comprends pas le problème. Cette procédure permet de gérer l'évènement
click. Donc pour cela tu es ok ? Je ne vois pas ce que tu veux dire par ton
problème de syntaxe avec la "commande click" (? c'est quoi une procédure,
une fonction, qui fait quoi ?).

Ce n'est pas à toi d'appeler cette procédure si c'est ce que tu essaies de
faire. Windows le fait lorsque le bouton est pressé (c'est ce qu'indique le
"Handles Button1.Click").

--
Patrice

"HeLioZz" a écrit dans le message de
news:
> pour la syntaxe du privat sub je n ai pas de souci !
> mais j aurai un pb pour la syntaxe de la commande click
> pourriez vous me donner un exemple de syntaxe de button.click SVP
> merci d avance!
>
> "Patrice" a écrit :
>
> > Toujours indiquer ce qui est fait et le message exact rencontré.
> >
> > Par exemple, cela pourrait donner :
> > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> > System.EventArgs) Handles Button1.Click
> > MsgBox("Cliqué !")
> > End Sub
> >
> > (avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
> > s'affichera lorsque le bouton est cliqué.
> >
> > Si tu es un débutant intégral essaie des initiations comme
> > http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
> > --
> > Patrice
> >
> > "HeLioZz" a écrit dans le message de
> > news:
> > > merci de cette info !
> > > mais le souci est que la commande click ne fonctionne pas !
> > > pourriez vous m aider en me donnant un exple de syntaxe ?
> > > merci
> > >
> > >
> > > "Patrice" a écrit :
> > >
> > > > Enabled indique si le bouton est "cliquable" ou non (activé) et non
pas
> > si
> > > > il est effectivement cliqué ou non. Je pense que tu cherches plutôt
> > > > l'évènement Click (en français) :
> > > >
> >
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> > > >
> > > > --
> > > > Patrice
> > > >
> > > > "HeLioZz" a écrit dans le
message de
> > > > news:
> > > > > bonjour a tous !
> > > > > voila je suis bien embeté pour mon programme!
> > > > > j ai essayé plusieur facon et ca ne fonctionne pas comme je l
espere
> > > > > voici le code :
> > > > > If Form2.Button1.Enabled = True Then
> > > > > TextBox11.Text = "Discothèque"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button2.Enabled = True Then
> > > > > TextBox11.Text = "Bar Karaoké"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button3.Enabled = True Then
> > > > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button4.Enabled = True Then
> > > > > TextBox11.Text = "Bar de nuit"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button5.Enabled = True Then
> > > > > TextBox11.Text = "Club"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button6.Enabled = True Then
> > > > > TextBox11.Text = "Cabaret"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button7.Enabled = True Then
> > > > > TextBox11.Text = "casino"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button8.Enabled = True Then
> > > > > TextBox11.Text = "bowling"
> > > > > TextBox11.Enabled = False
> > > > > ElseIf Form2.Button9.Enabled = True Then
> > > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > > TextBox11.Enabled = False
> > > > > End If
> > > > >
> > > > > le souci est que je peux cliquer sur n importe quel bouton ca m
ecris
> > dans
> > > > > ma textbox a chaque fois"discotheque".
> > > > > cela fait plusieurs jours que je suis sur ce pb!
> > > > > si quelqu un pouvait m aider svp ce serait super sympa
> > > > >
> > > > > merci d avance
> > > >
> > > >
> > > >
> >
> >
> >





Avatar
Patrice
Quel est le problème exact (message d'erreur à la compilation) avec la
syntaxe que j'ai donné précédemment ?

J'avais indiqué :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
MsgBox("Cliqué !")
End Sub

(sur 3 lignes).

Est-ce que cela marche ? Si non quel est le message d'erreur EXACT que tu
obtiens.
Si oui, ne reste plus qu'à remplacer l'affichage du message par ton
TextBox1.Text="Exemple"

Bon courage.
--
Patrice

"HeLioZz" a écrit dans le message de
news:
ma syntaxe etais

if button1.enabled=true
textbox1.text="exemple"
end if

hors on m a dit qu il fallait faire cette commande avec "click" a la place
de "enabled"
le souci est que j ai essayé de faire avec ce fameux click mais je n


arrive
pas a trouver la bonne syntaxe!
si vous avez une petite idée merci de m en faire part...


"Patrice" a écrit :

> Je ne comprends pas le problème. Cette procédure permet de gérer


l'évènement
> click. Donc pour cela tu es ok ? Je ne vois pas ce que tu veux dire par


ton
> problème de syntaxe avec la "commande click" (? c'est quoi une


procédure,
> une fonction, qui fait quoi ?).
>
> Ce n'est pas à toi d'appeler cette procédure si c'est ce que tu essaies


de
> faire. Windows le fait lorsque le bouton est pressé (c'est ce qu'indique


le
> "Handles Button1.Click").
>
> --
> Patrice
>
> "HeLioZz" a écrit dans le message de
> news:
> > pour la syntaxe du privat sub je n ai pas de souci !
> > mais j aurai un pb pour la syntaxe de la commande click
> > pourriez vous me donner un exemple de syntaxe de button.click SVP
> > merci d avance!
> >
> > "Patrice" a écrit :
> >
> > > Toujours indiquer ce qui est fait et le message exact rencontré.
> > >
> > > Par exemple, cela pourrait donner :
> > > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e


As
> > > System.EventArgs) Handles Button1.Click
> > > MsgBox("Cliqué !")
> > > End Sub
> > >
> > > (avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
> > > s'affichera lorsque le bouton est cliqué.
> > >
> > > Si tu es un débutant intégral essaie des initiations comme
> > > http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
> > > --
> > > Patrice
> > >
> > > "HeLioZz" a écrit dans le


message de
> > > news:
> > > > merci de cette info !
> > > > mais le souci est que la commande click ne fonctionne pas !
> > > > pourriez vous m aider en me donnant un exple de syntaxe ?
> > > > merci
> > > >
> > > >
> > > > "Patrice" a écrit :
> > > >
> > > > > Enabled indique si le bouton est "cliquable" ou non (activé) et


non
> pas
> > > si
> > > > > il est effectivement cliqué ou non. Je pense que tu cherches


plutôt
> > > > > l'évènement Click (en français) :
> > > > >
> > >
>


http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> > > > >
> > > > > --
> > > > > Patrice
> > > > >
> > > > > "HeLioZz" a écrit dans le
> message de
> > > > > news:
> > > > > > bonjour a tous !
> > > > > > voila je suis bien embeté pour mon programme!
> > > > > > j ai essayé plusieur facon et ca ne fonctionne pas comme je l
> espere
> > > > > > voici le code :
> > > > > > If Form2.Button1.Enabled = True Then
> > > > > > TextBox11.Text = "Discothèque"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button2.Enabled = True Then
> > > > > > TextBox11.Text = "Bar Karaoké"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button3.Enabled = True Then
> > > > > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button4.Enabled = True Then
> > > > > > TextBox11.Text = "Bar de nuit"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button5.Enabled = True Then
> > > > > > TextBox11.Text = "Club"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button6.Enabled = True Then
> > > > > > TextBox11.Text = "Cabaret"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button7.Enabled = True Then
> > > > > > TextBox11.Text = "casino"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button8.Enabled = True Then
> > > > > > TextBox11.Text = "bowling"
> > > > > > TextBox11.Enabled = False
> > > > > > ElseIf Form2.Button9.Enabled = True Then
> > > > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > > > TextBox11.Enabled = False
> > > > > > End If
> > > > > >
> > > > > > le souci est que je peux cliquer sur n importe quel bouton ca


m
> ecris
> > > dans
> > > > > > ma textbox a chaque fois"discotheque".
> > > > > > cela fait plusieurs jours que je suis sur ce pb!
> > > > > > si quelqu un pouvait m aider svp ce serait super sympa
> > > > > >
> > > > > > merci d avance
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >
>
>
>


Avatar
HeLioZz
voici le code que j aimerais faire fonctionner :

If Form2.Button1.Enabled = True Then
TextBox11.Text = "Discothèque"
TextBox11.Enabled = False
ElseIf Form2.Button2.Enabled = True Then
TextBox11.Text = "Bar Karaoké"
TextBox11.Enabled = False
ElseIf Form2.Button3.Enabled = True Then
TextBox11.Text = "Bar d'Ambiance Musicale"
TextBox11.Enabled = False
ElseIf Form2.Button4.Enabled = True Then
TextBox11.Text = "Bar de nuit"
TextBox11.Enabled = False
ElseIf Form2.Button5.Enabled = True Then
TextBox11.Text = "Club"
TextBox11.Enabled = False
ElseIf Form2.Button6.Enabled = True Then
TextBox11.Text = "Cabaret"
TextBox11.Enabled = False
ElseIf Form2.Button7.Enabled = True Then
TextBox11.Text = "casino"
TextBox11.Enabled = False
ElseIf Form2.Button8.Enabled = True Then
TextBox11.Text = "bowling"
TextBox11.Enabled = False
ElseIf Form2.Button9.Enabled = True Then
TextBox11.Text = "Immeuble a risques agravants"
TextBox11.Enabled = False
end if

auriez vous une idée pour laquelle ceci ne fonctionne pas ?

"Patrice" a écrit :

Quel est le problème exact (message d'erreur à la compilation) avec la
syntaxe que j'ai donné précédemment ?

J'avais indiqué :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
MsgBox("Cliqué !")
End Sub

(sur 3 lignes).

Est-ce que cela marche ? Si non quel est le message d'erreur EXACT que tu
obtiens.
Si oui, ne reste plus qu'à remplacer l'affichage du message par ton
TextBox1.Text="Exemple"

Bon courage.
--
Patrice

"HeLioZz" a écrit dans le message de
news:
> ma syntaxe etais
>
> if button1.enabled=true
> textbox1.text="exemple"
> end if
>
> hors on m a dit qu il fallait faire cette commande avec "click" a la place
> de "enabled"
> le souci est que j ai essayé de faire avec ce fameux click mais je n
arrive
> pas a trouver la bonne syntaxe!
> si vous avez une petite idée merci de m en faire part...
>
>
> "Patrice" a écrit :
>
> > Je ne comprends pas le problème. Cette procédure permet de gérer
l'évènement
> > click. Donc pour cela tu es ok ? Je ne vois pas ce que tu veux dire par
ton
> > problème de syntaxe avec la "commande click" (? c'est quoi une
procédure,
> > une fonction, qui fait quoi ?).
> >
> > Ce n'est pas à toi d'appeler cette procédure si c'est ce que tu essaies
de
> > faire. Windows le fait lorsque le bouton est pressé (c'est ce qu'indique
le
> > "Handles Button1.Click").
> >
> > --
> > Patrice
> >
> > "HeLioZz" a écrit dans le message de
> > news:
> > > pour la syntaxe du privat sub je n ai pas de souci !
> > > mais j aurai un pb pour la syntaxe de la commande click
> > > pourriez vous me donner un exemple de syntaxe de button.click SVP
> > > merci d avance!
> > >
> > > "Patrice" a écrit :
> > >
> > > > Toujours indiquer ce qui est fait et le message exact rencontré.
> > > >
> > > > Par exemple, cela pourrait donner :
> > > > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e
As
> > > > System.EventArgs) Handles Button1.Click
> > > > MsgBox("Cliqué !")
> > > > End Sub
> > > >
> > > > (avec bien sûr un bouton Bouton1 posé sur la feuille). Le message
> > > > s'affichera lorsque le bouton est cliqué.
> > > >
> > > > Si tu es un débutant intégral essaie des initiations comme
> > > > http://fr.gotdotnet.com/quickstart/winforms/ avant de te lancer...
> > > > --
> > > > Patrice
> > > >
> > > > "HeLioZz" a écrit dans le
message de
> > > > news:
> > > > > merci de cette info !
> > > > > mais le souci est que la commande click ne fonctionne pas !
> > > > > pourriez vous m aider en me donnant un exple de syntaxe ?
> > > > > merci
> > > > >
> > > > >
> > > > > "Patrice" a écrit :
> > > > >
> > > > > > Enabled indique si le bouton est "cliquable" ou non (activé) et
non
> > pas
> > > > si
> > > > > > il est effectivement cliqué ou non. Je pense que tu cherches
plutôt
> > > > > > l'évènement Click (en français) :
> > > > > >
> > > >
> >
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> > > > > >
> > > > > > --
> > > > > > Patrice
> > > > > >
> > > > > > "HeLioZz" a écrit dans le
> > message de
> > > > > > news:
> > > > > > > bonjour a tous !
> > > > > > > voila je suis bien embeté pour mon programme!
> > > > > > > j ai essayé plusieur facon et ca ne fonctionne pas comme je l
> > espere
> > > > > > > voici le code :
> > > > > > > If Form2.Button1.Enabled = True Then
> > > > > > > TextBox11.Text = "Discothèque"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button2.Enabled = True Then
> > > > > > > TextBox11.Text = "Bar Karaoké"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button3.Enabled = True Then
> > > > > > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button4.Enabled = True Then
> > > > > > > TextBox11.Text = "Bar de nuit"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button5.Enabled = True Then
> > > > > > > TextBox11.Text = "Club"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button6.Enabled = True Then
> > > > > > > TextBox11.Text = "Cabaret"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button7.Enabled = True Then
> > > > > > > TextBox11.Text = "casino"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button8.Enabled = True Then
> > > > > > > TextBox11.Text = "bowling"
> > > > > > > TextBox11.Enabled = False
> > > > > > > ElseIf Form2.Button9.Enabled = True Then
> > > > > > > TextBox11.Text = "Immeuble a risques agravants"
> > > > > > > TextBox11.Enabled = False
> > > > > > > End If
> > > > > > >
> > > > > > > le souci est que je peux cliquer sur n importe quel bouton ca
m
> > ecris
> > > > dans
> > > > > > > ma textbox a chaque fois"discotheque".
> > > > > > > cela fait plusieurs jours que je suis sur ce pb!
> > > > > > > si quelqu un pouvait m aider svp ce serait super sympa
> > > > > > >
> > > > > > > merci d avance
> > > > > >
> > > > > >
> > > > > >
> > > >
> > > >
> > > >
> >
> >
> >





Avatar
Patrice
C'est normal comme DEJA DIT. La propriété Enabled indique si le bouton est
"cliquable" (pas désactivé) et non pas si le bouton est cliqué au pas.

Cela devrait être plutôt donc :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
TextBox1.Text="Discothèque"
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
TextBox1.Text="Bar Karaoké"
End Sub

etc....

Merci de répondre aux questions posés plutôt que de repartir à zéro à chaque
nouveau message...

--
Patrice

"HeLioZz" a écrit dans le message de
news:
voici le code que j aimerais faire fonctionner :

If Form2.Button1.Enabled = True Then
TextBox11.Text = "Discothèque"
TextBox11.Enabled = False
ElseIf Form2.Button2.Enabled = True Then
TextBox11.Text = "Bar Karaoké"
TextBox11.Enabled = False
ElseIf Form2.Button3.Enabled = True Then
TextBox11.Text = "Bar d'Ambiance Musicale"
TextBox11.Enabled = False
ElseIf Form2.Button4.Enabled = True Then
TextBox11.Text = "Bar de nuit"
TextBox11.Enabled = False
ElseIf Form2.Button5.Enabled = True Then
TextBox11.Text = "Club"
TextBox11.Enabled = False
ElseIf Form2.Button6.Enabled = True Then
TextBox11.Text = "Cabaret"
TextBox11.Enabled = False
ElseIf Form2.Button7.Enabled = True Then
TextBox11.Text = "casino"
TextBox11.Enabled = False
ElseIf Form2.Button8.Enabled = True Then
TextBox11.Text = "bowling"
TextBox11.Enabled = False
ElseIf Form2.Button9.Enabled = True Then
TextBox11.Text = "Immeuble a risques agravants"
TextBox11.Enabled = False
end if

auriez vous une idée pour laquelle ceci ne fonctionne pas ?

"Patrice" a écrit :

> Quel est le problème exact (message d'erreur à la compilation) avec la
> syntaxe que j'ai donné précédemment ?
>
> J'avais indiqué :
>
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles Button1.Click
> MsgBox("Cliqué !")
> End Sub
>
> (sur 3 lignes).
>
> Est-ce que cela marche ? Si non quel est le message d'erreur EXACT que


tu
> obtiens.
> Si oui, ne reste plus qu'à remplacer l'affichage du message par ton
> TextBox1.Text="Exemple"
>
> Bon courage.
> --
> Patrice
>
> "HeLioZz" a écrit dans le message de
> news:
> > ma syntaxe etais
> >
> > if button1.enabled=true
> > textbox1.text="exemple"
> > end if
> >
> > hors on m a dit qu il fallait faire cette commande avec "click" a la


place
> > de "enabled"
> > le souci est que j ai essayé de faire avec ce fameux click mais je n
> arrive
> > pas a trouver la bonne syntaxe!
> > si vous avez une petite idée merci de m en faire part...
> >
> >
> > "Patrice" a écrit :
> >
> > > Je ne comprends pas le problème. Cette procédure permet de gérer
> l'évènement
> > > click. Donc pour cela tu es ok ? Je ne vois pas ce que tu veux dire


par
> ton
> > > problème de syntaxe avec la "commande click" (? c'est quoi une
> procédure,
> > > une fonction, qui fait quoi ?).
> > >
> > > Ce n'est pas à toi d'appeler cette procédure si c'est ce que tu


essaies
> de
> > > faire. Windows le fait lorsque le bouton est pressé (c'est ce


qu'indique
> le
> > > "Handles Button1.Click").
> > >
> > > --
> > > Patrice
> > >
> > > "HeLioZz" a écrit dans le


message de
> > > news:
> > > > pour la syntaxe du privat sub je n ai pas de souci !
> > > > mais j aurai un pb pour la syntaxe de la commande click
> > > > pourriez vous me donner un exemple de syntaxe de button.click SVP
> > > > merci d avance!
> > > >
> > > > "Patrice" a écrit :
> > > >
> > > > > Toujours indiquer ce qui est fait et le message exact rencontré.
> > > > >
> > > > > Par exemple, cela pourrait donner :
> > > > > Private Sub Button1_Click(ByVal sender As System.Object,


ByVal e
> As
> > > > > System.EventArgs) Handles Button1.Click
> > > > > MsgBox("Cliqué !")
> > > > > End Sub
> > > > >
> > > > > (avec bien sûr un bouton Bouton1 posé sur la feuille). Le


message
> > > > > s'affichera lorsque le bouton est cliqué.
> > > > >
> > > > > Si tu es un débutant intégral essaie des initiations comme
> > > > > http://fr.gotdotnet.com/quickstart/winforms/ avant de te


lancer...
> > > > > --
> > > > > Patrice
> > > > >
> > > > > "HeLioZz" a écrit dans le
> message de
> > > > > news:
> > > > > > merci de cette info !
> > > > > > mais le souci est que la commande click ne fonctionne pas !
> > > > > > pourriez vous m aider en me donnant un exple de syntaxe ?
> > > > > > merci
> > > > > >
> > > > > >
> > > > > > "Patrice" a écrit :
> > > > > >
> > > > > > > Enabled indique si le bouton est "cliquable" ou non (activé)


et
> non
> > > pas
> > > > > si
> > > > > > > il est effectivement cliqué ou non. Je pense que tu cherches
> plutôt
> > > > > > > l'évènement Click (en français) :
> > > > > > >
> > > > >
> > >
>


http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformscontrolclassclicktopic.asp
> > > > > > >
> > > > > > > --
> > > > > > > Patrice
> > > > > > >
> > > > > > > "HeLioZz" a écrit dans


le
> > > message de
> > > > > > > news:
> > > > > > > > bonjour a tous !
> > > > > > > > voila je suis bien embeté pour mon programme!
> > > > > > > > j ai essayé plusieur facon et ca ne fonctionne pas comme


je l
> > > espere
> > > > > > > > voici le code :
> > > > > > > > If Form2.Button1.Enabled = True Then
> > > > > > > > TextBox11.Text = "Discothèque"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button2.Enabled = True Then
> > > > > > > > TextBox11.Text = "Bar Karaoké"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button3.Enabled = True Then
> > > > > > > > TextBox11.Text = "Bar d'Ambiance Musicale"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button4.Enabled = True Then
> > > > > > > > TextBox11.Text = "Bar de nuit"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button5.Enabled = True Then
> > > > > > > > TextBox11.Text = "Club"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button6.Enabled = True Then
> > > > > > > > TextBox11.Text = "Cabaret"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button7.Enabled = True Then
> > > > > > > > TextBox11.Text = "casino"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button8.Enabled = True Then
> > > > > > > > TextBox11.Text = "bowling"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > ElseIf Form2.Button9.Enabled = True Then
> > > > > > > > TextBox11.Text = "Immeuble a risques


agravants"
> > > > > > > > TextBox11.Enabled = False
> > > > > > > > End If
> > > > > > > >
> > > > > > > > le souci est que je peux cliquer sur n importe quel bouton


ca
> m
> > > ecris
> > > > > dans
> > > > > > > > ma textbox a chaque fois"discotheque".
> > > > > > > > cela fait plusieurs jours que je suis sur ce pb!
> > > > > > > > si quelqu un pouvait m aider svp ce serait super sympa
> > > > > > > >
> > > > > > > > merci d avance
> > > > > > >
> > > > > > >
> > > > > > >
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >
>
>
>


1 2