Hola
Yo no he utilizado el control para realizar gráficos muy complejos, pero para uno sencillo no tiene gran complicación, primero tienes que agregar el componente Microsoft Chart Control. El código sería de esta forma:
Código:
Proveedor = "Microsoft.jet.OLEDB.4.0"
OrigenDatos = App.Path & "\bd.mdb" 'Ruta BD
comando = "Select sem, count(miembro) as [Total mienbros], sum(tottxsem) as [Total Transminsiones] from Tabla1 group by dnid, sem having dnid='" & Combo1.Text & "'" 'Select que queremos
cnn.Open "provider=" & Proveedor & ";Data Source=" & OrigenDatos
reg.Open comando, cnn, adOpenStatic
reg.MoveLast
reg.MoveFirst
With Grafico
.ShowLegend = True
.ChartType = VtChChartType2dLine 'Tipo de Graf
Set .DataSource = reg 'De donde coge los datos
'.Title.VtFont.Size = 16
'.TitleText = Combo1.Text 'Titulo del Gráfico
End With
Como puedes ver utilizo una select con Count y Sum y luego agrupado, en tu caso puedes adaptar la select a tus necesidades algo como Select Count(CodItem) from Ventas Group by month(fecha) y luego pasar el recordset obtenido al gráfico.
--Saludos--