faire afficher une constante

Question

Bonjour

Je travaille sur vb6 avec access 2007, utilisant la méthode ado.

sur ma BD j'ai un tableau ( nommé : TableLimites ) de constantes comme suite :



Limite1              Limite2              Taux

10000               20000               0%
20001               35000               5%
35001              45000              10%

sur mon interface , j'ai ComboBox sur lequel s'ffiche une serie
de numéro. et un label ( appelé : lblTaux ); et un autre label
 ( appelé : lblTotalpoint)

ce que je cherche à faire est d'afficher le taux correspond

c'est à dire une fois que je séléctionne un numéro sur le 
combobox, un total de point s'ffiche sur le lblTotalPoint
et le taux correspond à la plage ( Limite1 - Limite2 )
s'affiche sur le lblTaux


Merci d'avance pour votre aide

f894009 · Answer

Bonjour,

Mettez par programme vos valeur de la table limite dans un tableau,

ex: ici ecrit manuellement,  faire par programme lecture table

Dim T(2, 2, 0)
T(0, 0, 0) = 1000
T(1, 0, 0) = 20000
T(2, 0, 0) = 0

T(0, 1, 0) = 20001
T(1, 1, 0) = 35000
T(2, 1, 0) = 5

T(0, 2, 0) = 35001
T(1, 2, 0) = 45000
T(2, 2, 0) = 10

et a chaque selection d' un numero de serie, comparez dans une boucle de 0 a 2 le total de point avec les limites ecrite dans le tableau
For x = 0 To 2
    If Totalpoint > T(0, x, 0) And Totalpoint < T(1, x, 0) Then
        Taux = T(2, x, 0)
        Exit For
    End If
Next x

Faire afficher une constante

1 réponse

Discussions similaires

Newsletters