Code de mschar pour vb6.0 [Résolu]

Messages postés
5
Date d'inscription
jeudi 21 décembre 2000
Statut
Membre
Dernière intervention
11 juillet 2009
- - Dernière réponse : Claiyah
Messages postés
580
Date d'inscription
mercredi 20 août 2008
Statut
Membre
Dernière intervention
20 avril 2010
- 18 mai 2009 à 11:12
bjr,
comment faire un histogramme dans vb6.0 ,et leur code.
merci bien
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
580
Date d'inscription
mercredi 20 août 2008
Statut
Membre
Dernière intervention
20 avril 2010
3
Merci
ajoute MSChart1 dans ton projet
voila un exemple:

Private Sub Form_Load()
  Dim tabx(50) As Integer

 MSChart1.TitleText = "Courbe de test"
 MSChart1.chartType = VtChChartType2dLine

 For i = 1 To 50
 tabx(i) = i
 Next

 With MSChart1
 ' Pas de rafraichissement...
 .Repaint = False

 .ColumnCount = 2 ' 1 graphiques
 .RowCount = 100 ' Nb points

 ' Tracé du 1er graphe
 .Column = 1 ' numero du graphique
 .ColumnLabel = "tabx" ' Libellé du 1er graphe
 
 
 'on rentre les valeurs du graphe point par point
 For Row = 1 To 50
 .Row = Row 'X
 .RowLabel = CStr(Row)
 .Data = tabx(Row) 'Y
 Next Row
 .Repaint = True
 End With
 With MSChart1
 'tracé la 2eme courbe
 .Column = 2
 .ColumnLabel = "tabx"

'on rentre les valeurs du graphe point par point
 For Row = 1 To 50
 .Row = Row 'X
 .RowLabel = CStr(Row)
 .Data = tabx(Row) 'Y
 Next Row

 ' Rafraîchissement du controle
 .Repaint = True

 
 End With
End Sub

Les yeux montrent la force de l'âme

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 201 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Claiyah
Messages postés
580
Date d'inscription
mercredi 20 août 2008
Statut
Membre
Dernière intervention
20 avril 2010
3
Merci
bah accepte ma réponse

Les yeux montrent la force de l'âme

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 201 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Claiyah