pb textbox

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" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:AED4AB33-0EB2-420C-B7F6-0F706AE74037@microsoft.com...
> 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" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
> > news:972FA947-F034-4C17-ADFE-F1A567A5CE86@microsoft.com...
> > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
message de
> > > > news:6499BA53-6AC3-4059-9688-48C8C70803C8@microsoft.com...
> > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
> > message de
> > > > > > news:6D1464BA-C589-4995-B580-907A459D4209@microsoft.com...
> > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans
le
> > > > message de
> > > > > > > > news:86480018-28B3-4D4D-939F-92FE84C69ED1@microsoft.com...
> > > > > > > > > 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
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > >
> > > >
> > > >
> >
> >
> >

merci de cette reponse mais le probleme est que les boutons a cliquer et

text de la textbox ne sont pas dans la meme forme.
et si je fais dans le sens que vous m avez indiqué le debuger me di que la
textbox fai parti d une autre forme(donc ne fonctionne pas) . je dois

que je suis un peu perdu...
si je fais:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
forme2.TextBox1.Text="Discothèque"
End Sub
ca ne fonctionne pas ...
que faire dans ce cas ?

"Patrice" a écrit :

> C'est normal comme DEJA DIT. La propriété Enabled indique si le bouton

> "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 à

> nouveau message...
>
> --
> Patrice
>
> "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
> news:AED4AB33-0EB2-420C-B7F6-0F706AE74037@microsoft.com...
> > 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

> > > syntaxe que j'ai donné précédemment ?
> > >
> > > J'avais indiqué :
> > >
> > > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e

> > > 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

> tu
> > > obtiens.
> > > Si oui, ne reste plus qu'à remplacer l'affichage du message par ton
> > > TextBox1.Text="Exemple"
> > >
> > > Bon courage.
> > > --
> > > Patrice
> > >
> > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le

> > > news:972FA947-F034-4C17-ADFE-F1A567A5CE86@microsoft.com...
> > > > 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

> place
> > > > de "enabled"
> > > > le souci est que j ai essayé de faire avec ce fameux click mais je

> > > 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

> 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
> message de
> > > > > news:6499BA53-6AC3-4059-9688-48C8C70803C8@microsoft.com...
> > > > > > 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

> > > > > > merci d avance!
> > > > > >
> > > > > > "Patrice" a écrit :
> > > > > >
> > > > > > > Toujours indiquer ce qui est fait et le message exact

> > > > > > >
> > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans

> > > message de
> > > > > > > news:6D1464BA-C589-4995-B580-907A459D4209@microsoft.com...
> > > > > > > > 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

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

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

> > > > > > > > >
> > > > > > > > > --
> > > > > > > > > Patrice
> > > > > > > > >
> > > > > > > > > "HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit

> le
> > > > > message de
> > > > > > > > >

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

> 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

> 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
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >
>
>
>

Cela marche chez moi ? (VB.NET 2003) :

Dim f As New Form4

Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
f.Show() ' Afficher le deuxième formulaire

End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Button1.Click
' Quand cliqué modifier le textbox de l'autre formulaire...
f.TextBox1.Text = Now.ToString
End Sub

C'est le message exact du debugger ? (le message me parait bizarre, soit il
ne trouve pas le textbox, si il *sait* qu'il fait partie d'un autre
formulaire et donc il devrait pouvoir le manipuler).

--
Patrice

"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:27098212-0C01-4EC6-8FE0-FEA9AD90ADDE@microsoft.com...
> merci de cette reponse mais le probleme est que les boutons a cliquer et
le
> text de la textbox ne sont pas dans la meme forme.
> et si je fais dans le sens que vous m avez indiqué le debuger me di que la
> textbox fai parti d une autre forme(donc ne fonctionne pas) . je dois
avouer
> que je suis un peu perdu...
> si je fais:
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles Button1.Click
> forme2.TextBox1.Text="Discothèque"
> End Sub
> ca ne fonctionne pas ...
> que faire dans ce cas ?
>
> "Patrice" a écrit :
>
> > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
> > news:AED4AB33-0EB2-420C-B7F6-0F706AE74037@microsoft.com...
> > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
message de
> > > > news:972FA947-F034-4C17-ADFE-F1A567A5CE86@microsoft.com...
> > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
> > message de
> > > > > > news:6499BA53-6AC3-4059-9688-48C8C70803C8@microsoft.com...
> > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans
le
> > > > message de
> > > > > > > > news:6D1464BA-C589-4995-B580-907A459D4209@microsoft.com...
> > > > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit
dans
> > le
> > > > > > message de
> > > > > > > > > >
news:86480018-28B3-4D4D-939F-92FE84C69ED1@microsoft.com...
> > > > > > > > > > > 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
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > >
> > > > > >
> > > > > >

Cela marche chez moi ? (VB.NET 2003) :

Dim f As New Form4

Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
f.Show() ' Afficher le deuxième formulaire

End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Button1.Click
' Quand cliqué modifier le textbox de l'autre formulaire...
f.TextBox1.Text = Now.ToString
End Sub

C'est le message exact du debugger ? (le message me parait bizarre, soit il
ne trouve pas le textbox, si il *sait* qu'il fait partie d'un autre
formulaire et donc il devrait pouvoir le manipuler).

--
Patrice

"HeLioZz" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
news:27098212-0C01-4EC6-8FE0-FEA9AD90ADDE@microsoft.com...
> merci de cette reponse mais le probleme est que les boutons a cliquer et
le
> text de la textbox ne sont pas dans la meme forme.
> et si je fais dans le sens que vous m avez indiqué le debuger me di que la
> textbox fai parti d une autre forme(donc ne fonctionne pas) . je dois
avouer
> que je suis un peu perdu...
> si je fais:
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles Button1.Click
> forme2.TextBox1.Text="Discothèque"
> End Sub
> ca ne fonctionne pas ...
> que faire dans ce cas ?
>
> "Patrice" a écrit :
>
> > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le message de
> > news:AED4AB33-0EB2-420C-B7F6-0F706AE74037@microsoft.com...
> > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
message de
> > > > news:972FA947-F034-4C17-ADFE-F1A567A5CE86@microsoft.com...
> > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans le
> > message de
> > > > > > news:6499BA53-6AC3-4059-9688-48C8C70803C8@microsoft.com...
> > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit dans
le
> > > > message de
> > > > > > > > news:6D1464BA-C589-4995-B580-907A459D4209@microsoft.com...
> > > > > > > > > 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" <HeLioZz@discussions.microsoft.com> a écrit
dans
> > le
> > > > > > message de
> > > > > > > > > >
news:86480018-28B3-4D4D-939F-92FE84C69ED1@microsoft.com...
> > > > > > > > > > > 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
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > >
> > > > > >
> > > > > >