Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   Visual Basic clásico (http://www.forosdelweb.com/f69/)
-   -   error con mschart (http://www.forosdelweb.com/f69/error-con-mschart-545851/)

mmarti 06/01/2008 21:05

error con mschart
 
Hola a todos. Estoy empezando a usar mschart y me sale un error que no se a que se puede deber. Quizás puedan darme una mano.
Con este procedimiento recorro un listview y armo el grafico de acuerdo a los valores contenidos en dicho listview.

Private Sub Grafica()
Dim iIndiceFila As Integer
Dim iIndiceColumna
With chart.DataGrid

' Establecemos las Etiquetas de las Columnas
For iIndiceFila = 1 To lv.ListItems.Count
.RowLabel(iIndiceFila, 1) = lv.ListItems(iIndiceFila).text

Next
'Establecemos el tamaño del Chart
'Parametros: Total Etiquetas Cols, Total Etiquetas Series,
'Total Columnas, Total Series
.SetSize lv.ListItems.Count, 1, lv.ListItems.Count, 1
' Establecemos los valores de cada columna
' Parametros: Columna, Serie, Valor
For iIndiceFila = 1 To lv.ListItems.Count

.SetData iIndiceFila, 1, lv.ListItems(iIndiceFila).SubItems(1), 0

Next
End With
End Sub

El error que me da es: Error 1101 en tiempo de ejecución. Argumento de función incorrecto.
El error se produce al establecer las etiquetas de las columnas, mas especificamente al establecer la ultima etiqueta....
Alguna sugerencia?
Saludos!!


La zona horaria es GMT -6. Ahora son las 10:29.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.