Discussion :

[maxval18]

Bonsoir

Voila j'ai un USF avec 1 label et deux textbox.
Dans le premier textbox je rentre le nombre de participant ex. 71
Dans le premier Label je rentre le nombre de place assise par table ex. 4
Dans le Deuxième textbox je doit obtenir le nombre de table a quatre participant plus le nombre qui reste debout ex. 68 tables et 3 debout

Je vous remercie d'avance

Bonne soirée

Cordialement

Max

[casefayere]

Bonsoir,
j'évite d'ouvrir les fichiers compressés mais à ta lecture, ça demande des explications (on n'ouvre pas tous les fichiers, alors une bonne explication...)

71 participants
tables de 4
68 tables, je pense qu'il y a erreur 68 X4 = 272
+ 3 debout, on arrive à 275 participants

[mercatog]

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub TextBox1_Change()
Dim Nb As Byte
Dim T As Integer
 
Nb = Val(Me.Label1.Caption)
If Nb <> 0 Then
    T = Val(Me.TextBox1.Value)
    Me.TextBox2.Value = T \ Nb & " tables" & IIf(T = Nb * (T \ Nb), "", " et " & T - Nb * (T \ Nb) & " debout")
End If
End Sub

[maxval18]

Bonsoir mercatog,

Super exactement ma recherche

Je te remercie et te souhaite une bonne soirée

Cordialement

Max