gon_ak
Messages postés197Date d'inscriptionmardi 28 février 2006StatutMembreDernière intervention17 novembre 2006
-
16 août 2006 à 10:48
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 2012
-
16 août 2006 à 17:39
Rebonjour,
Apparemment ma question précédente ne vous a guère inspiré.
Je vais donc vous expliquer plus en détail!!
J'ai une base de donnée Access que j'ai affiché dans une Datagrid et dans laquelle j'ai deux colonnes:
Equipes Défauts
1 5
2 2
2 3
2 1
3 6
3 3
Je souhaite tracer un graphe avec ces deux colonnes c'est à dire les défauts en fonction des différentes équipes existantes.
Comme vous pouvez le constater j'ai trois équipes. Je souhaite donc calculer la valeur moyenne de chaque équipe et l'afficher graphiquement.
J'ai chercher sur le site mais je ne trouve pas mon bonheur.
Voudriez-vous bien m'aidez SVP,
Merci d'avance.
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 16 août 2006 à 17:24
Re,
Ce code est une requête SQL, pas du VB .
Si tu la mettre dans du VB alors n'oublie pas les guillemets qui doivent toujours entourer une chaine de caractere.
Dim s as String
s= "
SELECT DISTINCTROW [frmShiftReport.Adodc1].[ShiftNum], Avg([frmShiftReport.Adodc1].[DefCNT]) as [Moyenne de defauts] From frmShiftReport.Adodc1 GROUP BY [frmShiftReport.Adodc1].[ShiftNum] "
gon_ak
Messages postés197Date d'inscriptionmardi 28 février 2006StatutMembreDernière intervention17 novembre 2006 16 août 2006 à 13:31
Une autre petite question. Je n'arrive pas à insérer une image dans une picturebox dans ma page d'accueil.
J'ai trouvé un exemple mais en aucun cas il n'utilise le picturebox dans ces scripts!!! Alors comment il l'a fait pour l'insérer? Copier/coller ne fonctionne pas
gon_ak
Messages postés197Date d'inscriptionmardi 28 février 2006StatutMembreDernière intervention17 novembre 2006 16 août 2006 à 17:17
Voici mon code, je fais référence à ma base de données que j'ai sélectionnées des critères avant d'en vouloir tracé les graphes
Dim s as String
s= SELECT DISTINCTROW [frmShiftReport.Adodc1].[ShiftNum], Avg([frmShiftReport.Adodc1].[DefCNT]) as [Moyenne de defauts]
From frmShiftReport.Adodc1
GROUP BY [frmShiftReport.Adodc1].[ShiftNum]