Holas gente,necesito ayuda, rindo el lunes y no se como puedo hacer esto:

Tengo un boton :

Private Sub Command1_Click()
grafico.Data = Text1.Text
End Sub
un grafico:

Private Sub grafico_OLEStartDrag(Data As MSChart20Lib.DataObject, AllowedEffects As Long)

End Sub
y un text:

Private Sub Text1_Change()

End Sub





Cuando ingreso un valor en el text(por ejemplo 5) automaticamente el grafico cambia.
Mi problema es que cuando salgo del programa y luego lo vuelvo a abrir,el grafico se reinicia y no conserva los datos anteriores.
Alguien sabe como puedo hacer para que mantenga los datos?

Desde ya muchas gracias