bonjour =E0 tous=20
je debute dans visual basic et voici le debut de ma=20
procedure
Public Function difference(nbr1 As Integer, nbr2 As=20
Integer) As Integer
difference =3D nbr1 - nbr2
End Function
Private Sub calcul_Click()
Dim theorique As Integer
Dim reel As Integer
Dim resultat As Integer
theorique =3D TGP1.Text
reel =3D RGP1.Text
If difference(theorique, reel) > (TGP1.Value * 0.75) Then
ma question
Je voudrais que lorsque je clique sur le bouton calcul le=20
resultat de ma fonction s il est superieur=20
au produit de la textbox TGP1*0.75 s inscrive dans la=20
textbox DGP1 sinon rien ne s'inscrit.
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
Denis Michon
Bonjour luludebutant,
Fichier exemple dans ta bal.
Salutations!
"luludebutant" a écrit dans le message de news:06fb01c396f2$51e833d0$ bonjour à tous je debute dans visual basic et voici le debut de ma procedure
Public Function difference(nbr1 As Integer, nbr2 As Integer) As Integer difference = nbr1 - nbr2 End Function
Private Sub calcul_Click() Dim theorique As Integer Dim reel As Integer Dim resultat As Integer
theorique = TGP1.Text reel = RGP1.Text
If difference(theorique, reel) > (TGP1.Value * 0.75) Then
ma question
Je voudrais que lorsque je clique sur le bouton calcul le resultat de ma fonction s il est superieur au produit de la textbox TGP1*0.75 s inscrive dans la textbox DGP1 sinon rien ne s'inscrit.
merci de votre aide
Bonjour luludebutant,
Fichier exemple dans ta bal.
Salutations!
"luludebutant" <lumia.jeancharles@wanadoo.fr> a écrit dans le message de news:06fb01c396f2$51e833d0$a501280a@phx.gbl...
bonjour à tous
je debute dans visual basic et voici le debut de ma
procedure
Public Function difference(nbr1 As Integer, nbr2 As
Integer) As Integer
difference = nbr1 - nbr2
End Function
Private Sub calcul_Click()
Dim theorique As Integer
Dim reel As Integer
Dim resultat As Integer
theorique = TGP1.Text
reel = RGP1.Text
If difference(theorique, reel) > (TGP1.Value * 0.75) Then
ma question
Je voudrais que lorsque je clique sur le bouton calcul le
resultat de ma fonction s il est superieur
au produit de la textbox TGP1*0.75 s inscrive dans la
textbox DGP1 sinon rien ne s'inscrit.
"luludebutant" a écrit dans le message de news:06fb01c396f2$51e833d0$ bonjour à tous je debute dans visual basic et voici le debut de ma procedure
Public Function difference(nbr1 As Integer, nbr2 As Integer) As Integer difference = nbr1 - nbr2 End Function
Private Sub calcul_Click() Dim theorique As Integer Dim reel As Integer Dim resultat As Integer
theorique = TGP1.Text reel = RGP1.Text
If difference(theorique, reel) > (TGP1.Value * 0.75) Then
ma question
Je voudrais que lorsque je clique sur le bouton calcul le resultat de ma fonction s il est superieur au produit de la textbox TGP1*0.75 s inscrive dans la textbox DGP1 sinon rien ne s'inscrit.
