Necesito gráfico en un formulario

Estimados amigos del foro. Tengo un sistema básico que registra venta, compras y gastos.. He logrado desde u form independiente obtener con Dsum los datos de ventas, compras y gastos desde las distintas tablas al seleccionar un año desde cboAno en el formulario independiente. El código es el siguiente:

Option Compare Database
Private Sub Balance_Click()
Dim Ventas As Currency
Dim Compras As Currency
Dim Gastos As Currency
On Error GoTo Gestionaerror
'Me.Precio = Me.Lista10.Column(2)  'FUNCIONA, DANILO MUY UTIL
'If Nz(Me.IdProducto, 0) = 0 Then Exit Sub
Me.Ventas = DSum("NetoF", "tblFacturaVenta", "AnoVenta='" & Me.cboAno & "'") 'FUNCIONA, DANILO
Me.Compras = DSum("NetoC", "tblFacturaCompra", "AnoCompra='" & Me.cboAno & "'") 'FUNCIONA, DANILO
Me.Gastos = DSum("MontoGasto", "tblGasto", "AnoGasto='" & Me.cboAno & "'") 'FUNCIONA, DANILO
Me.Resultado = Me.Ventas - Me.Compras - Me.Gastos
Me.Refresh
Me.cboAno.SetFocus
Gestionaerror:
        If Err.Number <> 0 Then
                  Resume Next
        End If
End Sub

Quisiera hacer dos cosas, agregar un gráfico, pastel, líneas o barras que me indique visualmente el comportamiento de estas tres cuentas en el mismo formulario independiente... ¿alguna idea amigos?

Añade tu respuesta

Haz clic para o